r73589 - in /branches/upstream/libdatetime-perl/current: ./ lib/ lib/DateTime/ t/
periapt-guest at users.alioth.debian.org
periapt-guest at users.alioth.debian.org
Tue Apr 26 06:11:21 UTC 2011
Author: periapt-guest
Date: Tue Apr 26 06:08:50 2011
New Revision: 73589
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=73589
Log:
[svn-upgrade] new version libdatetime-perl (0.6800)
Modified:
branches/upstream/libdatetime-perl/current/Build.PL
branches/upstream/libdatetime-perl/current/Changes
branches/upstream/libdatetime-perl/current/META.json
branches/upstream/libdatetime-perl/current/META.yml
branches/upstream/libdatetime-perl/current/README
branches/upstream/libdatetime-perl/current/SIGNATURE
branches/upstream/libdatetime-perl/current/dist.ini
branches/upstream/libdatetime-perl/current/lib/DateTime.pm
branches/upstream/libdatetime-perl/current/lib/DateTime/Duration.pm
branches/upstream/libdatetime-perl/current/lib/DateTime/Helpers.pm
branches/upstream/libdatetime-perl/current/lib/DateTime/Infinite.pm
branches/upstream/libdatetime-perl/current/lib/DateTime/LeapSecond.pm
branches/upstream/libdatetime-perl/current/lib/DateTimePP.pm
branches/upstream/libdatetime-perl/current/lib/DateTimePPExtra.pm
branches/upstream/libdatetime-perl/current/t/13strftime.t
branches/upstream/libdatetime-perl/current/t/release-pp-13strftime.t
Modified: branches/upstream/libdatetime-perl/current/Build.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-perl/current/Build.PL?rev=73589&op=diff
==============================================================================
--- branches/upstream/libdatetime-perl/current/Build.PL (original)
+++ branches/upstream/libdatetime-perl/current/Build.PL Tue Apr 26 06:08:50 2011
@@ -22,7 +22,7 @@
'Dave Rolsky <autarch at urth.org>'
],
'dist_name' => 'DateTime',
- 'dist_version' => '0.67',
+ 'dist_version' => '0.68',
'license' => 'artistic_2',
'module_name' => 'DateTime',
'recommends' => {},
Modified: branches/upstream/libdatetime-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-perl/current/Changes?rev=73589&op=diff
==============================================================================
--- branches/upstream/libdatetime-perl/current/Changes (original)
+++ branches/upstream/libdatetime-perl/current/Changes Tue Apr 26 06:08:50 2011
@@ -1,3 +1,11 @@
+0.68 2011-04-25
+
+- The tests for %N in the last release relied on the vagaries of floating
+ point math on a 64-bit system. Now the from_epoch() method just uses string
+ operations to separate the epoch into an integer value and a mantissa. This
+ avoids floating point insanity. Reported by zefram. RT #67736.
+
+
0.67 2011-04-24
- The %N strftime specifier simply truncated nanoseconds, rather than rounding
Modified: branches/upstream/libdatetime-perl/current/META.json
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-perl/current/META.json?rev=73589&op=diff
==============================================================================
--- branches/upstream/libdatetime-perl/current/META.json (original)
+++ branches/upstream/libdatetime-perl/current/META.json Tue Apr 26 06:08:50 2011
@@ -52,6 +52,6 @@
"web" : "http://hg.urth.org/hg/DateTime.pm"
}
},
- "version" : "0.67"
+ "version" : "0.68"
}
Modified: branches/upstream/libdatetime-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-perl/current/META.yml?rev=73589&op=diff
==============================================================================
--- branches/upstream/libdatetime-perl/current/META.yml (original)
+++ branches/upstream/libdatetime-perl/current/META.yml Tue Apr 26 06:08:50 2011
@@ -28,4 +28,4 @@
resources:
bugtracker: http://rt.cpan.org/NoAuth/Bugs.html?Dist=DateTime
repository: http://hg.urth.org/hg/DateTime.pm
-version: 0.67
+version: 0.68
Modified: branches/upstream/libdatetime-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-perl/current/README?rev=73589&op=diff
==============================================================================
--- branches/upstream/libdatetime-perl/current/README (original)
+++ branches/upstream/libdatetime-perl/current/README Tue Apr 26 06:08:50 2011
@@ -1,7 +1,7 @@
This archive contains the distribution DateTime,
-version 0.67:
+version 0.68:
A date and time object
Modified: branches/upstream/libdatetime-perl/current/SIGNATURE
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-perl/current/SIGNATURE?rev=73589&op=diff
==============================================================================
--- branches/upstream/libdatetime-perl/current/SIGNATURE (original)
+++ branches/upstream/libdatetime-perl/current/SIGNATURE Tue Apr 26 06:08:50 2011
@@ -14,29 +14,29 @@
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
-SHA1 e1b2af53081fa772a3b958aac091db285485b807 Build.PL
+SHA1 5105196598d3b972e074864622fed687a3ae731c Build.PL
SHA1 c951898b770a16da2897d908ab6f9f72057bd570 CREDITS
-SHA1 a0af2607c17cb6f6141dfe06a621a85b602f1f49 Changes
+SHA1 6cd3bf5617785dfbde1c47a46b984282a9e494dc Changes
SHA1 c5f2b8434452ecd4c943c59ae2a95abb9d75332d INSTALL
SHA1 c715d20265d2931c7564fc64abfdc4f8ff33e297 LICENSE
SHA1 3bf9718f28d341b3df7d8b35a030b3b3e18eafed MANIFEST
-SHA1 e952a2a6e511bd0e2b7322db0ecb6a52f6f6e0f1 META.json
-SHA1 b62e7a95a8fb321ac29fe096c47352b166f73cab META.yml
-SHA1 24ab8252bbeb1746cfae76f32195d0fcf4ab187d README
+SHA1 4dd0d78c2dbc69138c4be13705e9906367f82113 META.json
+SHA1 6edc6900bfefd93d92172a58212223738d9e17d2 META.yml
+SHA1 dfd8e89f77ff3581b64d2c2c9342d100608b0498 README
SHA1 bfc70fbe8fa29484452bea8c2ed4afd55218f2c2 TODO
SHA1 b67b906c9fbaab9ccac635d623cb4e6064feb8f0 c/leap_seconds.h
SHA1 4cd12d2a050ab038e519bd1391f77855ba4b24ac c/ppport.h
-SHA1 c97564e2f5cc9b6e24e315be1c73a717a3b785f0 dist.ini
+SHA1 02827bcc0a13cde143c0e26623e41eea1685d157 dist.ini
SHA1 2d1f339f1a2ceb22c2657d7c21983f69bc7456e3 inc/MyModuleBuild.pm
SHA1 ad083d04f765963b707dab9d566bf17e92fa51e9 leaptab.txt
-SHA1 a9348ae5a159a9ec0924208bb8cb9566be5a7389 lib/DateTime.pm
+SHA1 31917247e772d35e2fcb5cb8286eb1e33f234a0a lib/DateTime.pm
SHA1 d2c3464984dc7567d8ef825a80fc4d5ed3602d0a lib/DateTime.xs
-SHA1 3fb1ebd3485d9caf7ba7fe669d210f6dbff0d3a5 lib/DateTime/Duration.pm
-SHA1 566f3d6df4c2a5705695b96b48f2ab72f14d7852 lib/DateTime/Helpers.pm
-SHA1 3e6a81cbb3e458af54f13c14f69724e7d563c378 lib/DateTime/Infinite.pm
-SHA1 60b39dce1c847e49f4a09a7e6770ff373863e62b lib/DateTime/LeapSecond.pm
-SHA1 b67d541a99a564182442256093a2cd9a0796a6f2 lib/DateTimePP.pm
-SHA1 e0501809109a25f5f30b68715e5e9d50422535f6 lib/DateTimePPExtra.pm
+SHA1 358f059de67ee1e9c6a75453f0fe662f194c872c lib/DateTime/Duration.pm
+SHA1 56cf527de80c22fab8c5389b19b56453640ff68c lib/DateTime/Helpers.pm
+SHA1 92436503ee27e98741677308c26d3dc150153a59 lib/DateTime/Infinite.pm
+SHA1 690ad9dd803900f0ce5612281a002bc7ed97a09e lib/DateTime/LeapSecond.pm
+SHA1 095de2caf7085aaecb601dc3e6b0f97668b683f6 lib/DateTimePP.pm
+SHA1 ef22101516cad117dcdd0c2157a91aa751971a2c lib/DateTimePPExtra.pm
SHA1 b7d12ae6a374c314afcf6ee289a1ae309d8a8563 t/00load.t
SHA1 53ac3a3da64401a86b06ed6dbcc1af01ba7741dd t/01sanity.t
SHA1 1ced0f94d405f32f687b5a86c245774fabb44b40 t/02last-day.t
@@ -49,7 +49,7 @@
SHA1 2b6582dbdcc95a3a8c928da233d3c9cefa8193ef t/10subtract.t
SHA1 26ba2f29d7b049dd1f58cdd25f91d919263b9008 t/11duration.t
SHA1 9c04679ba62e41c5c0d28fbf5dbc94536827fe65 t/12week.t
-SHA1 4587a2cc332695f23c8ddf53727435c6e40e5b7d t/13strftime.t
+SHA1 8944ea881dc734a30119e0359741e026d49f0887 t/13strftime.t
SHA1 5a8e5f135d1735c25981b73ce06fd68296372405 t/14locale.t
SHA1 31d4392975a4d13e6c10145b9e63b4c45350c148 t/15jd.t
SHA1 78fd6143e323413681f73d94f68382c257f7b67e t/16truncate.t
@@ -101,7 +101,7 @@
SHA1 ba80cd8fcdb2aa0cedb2a057053d19667e9471aa t/release-pp-10subtract.t
SHA1 4773be589e9b5406377527e9525d8450e04d5e73 t/release-pp-11duration.t
SHA1 e69c9d656b6462e7d52bba196ce6f6e878798a59 t/release-pp-12week.t
-SHA1 fc0256619715c08c278a49c1619840e4533720e9 t/release-pp-13strftime.t
+SHA1 bb7934d2b4f258c7a68585f48fa17359b4c11d9e t/release-pp-13strftime.t
SHA1 b7e108865965a5a16d2b64677c7d1d3a9ee1ff03 t/release-pp-14locale.t
SHA1 585ac7a24117d215cdbf37c211b62dc8a95f6c0c t/release-pp-15jd.t
SHA1 0c18ef64cdefdd559e24a344868c62439d471ff9 t/release-pp-16truncate.t
@@ -136,7 +136,7 @@
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.10 (GNU/Linux)
-iEYEARECAAYFAk20XC4ACgkQIgMCsV8qvRIscgCeOHXz66Q8xcADhLtMwY0CDZh1
-nrQAnjNehTj6Iyb4sAccFyrSSDQMoLK+
-=qplf
+iEYEARECAAYFAk21qa8ACgkQIgMCsV8qvRIlqwCfWGPDkzjwZKzCrYlogNklntRP
+B4wAnjklVa/5uREgyUtVRcPYu86kjHKu
+=e3jF
-----END PGP SIGNATURE-----
Modified: branches/upstream/libdatetime-perl/current/dist.ini
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-perl/current/dist.ini?rev=73589&op=diff
==============================================================================
--- branches/upstream/libdatetime-perl/current/dist.ini (original)
+++ branches/upstream/libdatetime-perl/current/dist.ini Tue Apr 26 06:08:50 2011
@@ -3,7 +3,7 @@
license = Artistic_2_0
copyright_holder = Dave Rolsky
-version = 0.67
+version = 0.68
[NextRelease]
format = %-6v %{yyyy-MM-dd}d
Modified: branches/upstream/libdatetime-perl/current/lib/DateTime.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-perl/current/lib/DateTime.pm?rev=73589&op=diff
==============================================================================
--- branches/upstream/libdatetime-perl/current/lib/DateTime.pm (original)
+++ branches/upstream/libdatetime-perl/current/lib/DateTime.pm Tue Apr 26 06:08:50 2011
@@ -1,6 +1,6 @@
package DateTime;
BEGIN {
- $DateTime::VERSION = '0.67';
+ $DateTime::VERSION = '0.68';
}
use 5.008001;
@@ -489,16 +489,17 @@
my %p = validate( @_, $spec );
my %args;
-
- # Because epoch may come from Time::HiRes
- my $fraction = $p{epoch} - int( $p{epoch} );
- $args{nanosecond} = int( $fraction * MAX_NANOSECONDS )
- if $fraction;
+ # Epoch may come from Time::HiRes, so it may not be an integer.
+ my ( $int, $dec ) = $p{epoch} =~ /^(-?\d+)?(\.\d+)?/;
+ $int ||= 0;
+
+ $args{nanosecond} = int( $dec * MAX_NANOSECONDS )
+ if $dec;
# Note, for very large negative values this may give a
# blatantly wrong answer.
@args{qw( second minute hour day month year )}
- = ( gmtime( int delete $p{epoch} ) )[ 0 .. 5 ];
+ = ( gmtime($int) )[ 0 .. 5 ];
$args{year} += 1900;
$args{month}++;
@@ -2039,7 +2040,7 @@
package DateTime::_Thawed;
BEGIN {
- $DateTime::_Thawed::VERSION = '0.67';
+ $DateTime::_Thawed::VERSION = '0.68';
}
sub utc_rd_values { @{ $_[0]->{utc_vals} } }
@@ -2060,7 +2061,7 @@
=head1 VERSION
-version 0.67
+version 0.68
=head1 SYNOPSIS
Modified: branches/upstream/libdatetime-perl/current/lib/DateTime/Duration.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-perl/current/lib/DateTime/Duration.pm?rev=73589&op=diff
==============================================================================
--- branches/upstream/libdatetime-perl/current/lib/DateTime/Duration.pm (original)
+++ branches/upstream/libdatetime-perl/current/lib/DateTime/Duration.pm Tue Apr 26 06:08:50 2011
@@ -1,6 +1,6 @@
package DateTime::Duration;
BEGIN {
- $DateTime::Duration::VERSION = '0.67';
+ $DateTime::Duration::VERSION = '0.68';
}
use strict;
@@ -318,7 +318,7 @@
=head1 VERSION
-version 0.67
+version 0.68
=head1 SYNOPSIS
Modified: branches/upstream/libdatetime-perl/current/lib/DateTime/Helpers.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-perl/current/lib/DateTime/Helpers.pm?rev=73589&op=diff
==============================================================================
--- branches/upstream/libdatetime-perl/current/lib/DateTime/Helpers.pm (original)
+++ branches/upstream/libdatetime-perl/current/lib/DateTime/Helpers.pm Tue Apr 26 06:08:50 2011
@@ -1,6 +1,6 @@
package DateTime::Helpers;
BEGIN {
- $DateTime::Helpers::VERSION = '0.67';
+ $DateTime::Helpers::VERSION = '0.68';
}
use strict;
Modified: branches/upstream/libdatetime-perl/current/lib/DateTime/Infinite.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-perl/current/lib/DateTime/Infinite.pm?rev=73589&op=diff
==============================================================================
--- branches/upstream/libdatetime-perl/current/lib/DateTime/Infinite.pm (original)
+++ branches/upstream/libdatetime-perl/current/lib/DateTime/Infinite.pm Tue Apr 26 06:08:50 2011
@@ -1,6 +1,6 @@
package DateTime::Infinite;
BEGIN {
- $DateTime::Infinite::VERSION = '0.67';
+ $DateTime::Infinite::VERSION = '0.68';
}
use strict;
@@ -38,7 +38,7 @@
package DateTime::Infinite::Future;
BEGIN {
- $DateTime::Infinite::Future::VERSION = '0.67';
+ $DateTime::Infinite::Future::VERSION = '0.68';
}
use base qw(DateTime::Infinite);
@@ -62,7 +62,7 @@
package DateTime::Infinite::Past;
BEGIN {
- $DateTime::Infinite::Past::VERSION = '0.67';
+ $DateTime::Infinite::Past::VERSION = '0.68';
}
use base qw(DateTime::Infinite);
@@ -98,7 +98,7 @@
=head1 VERSION
-version 0.67
+version 0.68
=head1 SYNOPSIS
Modified: branches/upstream/libdatetime-perl/current/lib/DateTime/LeapSecond.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-perl/current/lib/DateTime/LeapSecond.pm?rev=73589&op=diff
==============================================================================
--- branches/upstream/libdatetime-perl/current/lib/DateTime/LeapSecond.pm (original)
+++ branches/upstream/libdatetime-perl/current/lib/DateTime/LeapSecond.pm Tue Apr 26 06:08:50 2011
@@ -1,6 +1,6 @@
package DateTime::LeapSecond;
BEGIN {
- $DateTime::LeapSecond::VERSION = '0.67';
+ $DateTime::LeapSecond::VERSION = '0.68';
}
use strict;
@@ -130,7 +130,7 @@
=head1 VERSION
-version 0.67
+version 0.68
=head1 SYNOPSIS
Modified: branches/upstream/libdatetime-perl/current/lib/DateTimePP.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-perl/current/lib/DateTimePP.pm?rev=73589&op=diff
==============================================================================
--- branches/upstream/libdatetime-perl/current/lib/DateTimePP.pm (original)
+++ branches/upstream/libdatetime-perl/current/lib/DateTimePP.pm Tue Apr 26 06:08:50 2011
@@ -1,6 +1,6 @@
package DateTime;
BEGIN {
- $DateTime::VERSION = '0.67';
+ $DateTime::VERSION = '0.68';
}
use strict;
Modified: branches/upstream/libdatetime-perl/current/lib/DateTimePPExtra.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-perl/current/lib/DateTimePPExtra.pm?rev=73589&op=diff
==============================================================================
--- branches/upstream/libdatetime-perl/current/lib/DateTimePPExtra.pm (original)
+++ branches/upstream/libdatetime-perl/current/lib/DateTimePPExtra.pm Tue Apr 26 06:08:50 2011
@@ -1,6 +1,6 @@
package DateTime;
BEGIN {
- $DateTime::VERSION = '0.67';
+ $DateTime::VERSION = '0.68';
}
use strict;
Modified: branches/upstream/libdatetime-perl/current/t/13strftime.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-perl/current/t/13strftime.t?rev=73589&op=diff
==============================================================================
--- branches/upstream/libdatetime-perl/current/t/13strftime.t (original)
+++ branches/upstream/libdatetime-perl/current/t/13strftime.t Tue Apr 26 06:08:50 2011
@@ -143,10 +143,10 @@
1200,
12000,
120000,
- 1199999,
- 11999989,
- 119999885,
- 1199998850,
+ 1200000,
+ 12000000,
+ 120000000,
+ 1200000000,
);
my $x = 1;
Modified: branches/upstream/libdatetime-perl/current/t/release-pp-13strftime.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-perl/current/t/release-pp-13strftime.t?rev=73589&op=diff
==============================================================================
--- branches/upstream/libdatetime-perl/current/t/release-pp-13strftime.t (original)
+++ branches/upstream/libdatetime-perl/current/t/release-pp-13strftime.t Tue Apr 26 06:08:50 2011
@@ -155,10 +155,10 @@
1200,
12000,
120000,
- 1199999,
- 11999989,
- 119999885,
- 1199998850,
+ 1200000,
+ 12000000,
+ 120000000,
+ 1200000000,
);
my $x = 1;
More information about the Pkg-perl-cvs-commits
mailing list