r74610 - in /branches/upstream/librose-datetime-perl/current: Changes META.yml lib/Rose/DateTime.pm t/basic.t

[periapt-guest at users.alioth.debian.org]

Author: periapt-guest
Date: Tue May 17 00:52:06 2011
New Revision: 74610

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=74610
Log:
[svn-upgrade] new version librose-datetime-perl (0.537)

Modified:
    branches/upstream/librose-datetime-perl/current/Changes
    branches/upstream/librose-datetime-perl/current/META.yml
    branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime.pm
    branches/upstream/librose-datetime-perl/current/t/basic.t

Modified: branches/upstream/librose-datetime-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/librose-datetime-perl/current/Changes?rev=74610&op=diff
==============================================================================
--- branches/upstream/librose-datetime-perl/current/Changes (original)
+++ branches/upstream/librose-datetime-perl/current/Changes Tue May 17 00:52:06 2011
@@ -1,3 +1,12 @@
+0.537 (05.04.2011) - John Siracusa <siracusa at gmail.com>
+
+    * Well that was fast.  DateTime 0.69 fixes RT 67928.  Tests updated.
+
+0.536 (05.03.2011) - John Siracusa <siracusa at gmail.com>
+
+    * Account for changes in DateTime 0.67 and later and work around
+      http://rt.cpan.org/Public/Bug/Display.html?id=67928
+
 0.535 (01.24.2010) - John Siracusa <siracusa at gmail.com>
 
     * Handle pre-0.4 version of DateTime::Locale.  (RT 65070)

Modified: branches/upstream/librose-datetime-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/librose-datetime-perl/current/META.yml?rev=74610&op=diff
==============================================================================
--- branches/upstream/librose-datetime-perl/current/META.yml (original)
+++ branches/upstream/librose-datetime-perl/current/META.yml Tue May 17 00:52:06 2011
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               Rose-DateTime
-version:            0.535
+version:            0.537
 abstract:           ~
 author:  []
 license:            unknown

Modified: branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime.pm?rev=74610&op=diff
==============================================================================
--- branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime.pm (original)
+++ branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime.pm Tue May 17 00:52:06 2011
@@ -2,7 +2,7 @@
 
 use strict; # ha
 
-our $VERSION = '0.535';
+our $VERSION = '0.537';
 
 1;
 

Modified: branches/upstream/librose-datetime-perl/current/t/basic.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/librose-datetime-perl/current/t/basic.t?rev=74610&op=diff
==============================================================================
--- branches/upstream/librose-datetime-perl/current/t/basic.t (original)
+++ branches/upstream/librose-datetime-perl/current/t/basic.t Tue May 17 00:52:06 2011
@@ -478,14 +478,22 @@
   ok(1, "This system ($^O) can't handle negative epoch values");
 }
 
-$d = parse_date('1143744435.123456789');
+$d = parse_date('1143744435.123451234');
 is($d->strftime('%Y-%m-%d %H:%M:%S.%5N'), '2006-03-30 18:47:15.12345', 'Epoch vs. yyyymmdd 4');
 
 $d = parse_date('1143744435.123');
 is($d->strftime('%Y-%m-%d %H:%M:%S.%5N'), '2006-03-30 18:47:15.12300', 'Epoch vs. yyyymmdd 5');
 
 $d = parse_date('1143744435.');
-is($d->strftime('%Y-%m-%d %H:%M:%S.%5N'), '2006-03-30 18:47:15.00000', 'Epoch vs. yyyymmdd 6');
+
+if ($DateTime::VERSION >= 0.67 && $DateTime::VERSION <= 0.68)
+{
+  is($d->strftime('%Y-%m-%d %H:%M:%S.%5N'), '2006-03-30 18:47:15.0', 'Epoch vs. yyyymmdd 6');
+}
+else
+{
+  is($d->strftime('%Y-%m-%d %H:%M:%S.%5N'), '2006-03-30 18:47:15.00000', 'Epoch vs. yyyymmdd 6');
+}
 
 $d = parse_date('19800102 8pm');
 is($d->strftime('%Y-%m-%d %H:%M:%S'), '1980-01-02 20:00:00', 'yyyymmdd 1');