r50609 - in /branches/upstream/libtimedate-perl/current: ChangeLog MANIFEST META.yml Makefile.PL SIGNATURE lib/Date/Format.pm lib/Date/Parse.pm t/cpanrt.t

jawnsy-guest at users.alioth.debian.org jawnsy-guest at users.alioth.debian.org
Sat Jan 9 23:34:21 UTC 2010 

Author: jawnsy-guest
Date: Sat Jan  9 23:33:55 2010
New Revision: 50609

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=50609
Log:
[svn-upgrade] Integrating new upstream version, timedate (1.2000)

Modified:
    branches/upstream/libtimedate-perl/current/ChangeLog
    branches/upstream/libtimedate-perl/current/MANIFEST
    branches/upstream/libtimedate-perl/current/META.yml
    branches/upstream/libtimedate-perl/current/Makefile.PL
    branches/upstream/libtimedate-perl/current/SIGNATURE
    branches/upstream/libtimedate-perl/current/lib/Date/Format.pm
    branches/upstream/libtimedate-perl/current/lib/Date/Parse.pm
    branches/upstream/libtimedate-perl/current/t/cpanrt.t

Modified: branches/upstream/libtimedate-perl/current/ChangeLog
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtimedate-perl/current/ChangeLog?rev=50609&op=diff
==============================================================================
--- branches/upstream/libtimedate-perl/current/ChangeLog (original)
+++ branches/upstream/libtimedate-perl/current/ChangeLog Sat Jan  9 23:33:55 2010
@@ -1,3 +1,9 @@
+1.20 -- Sat Dec 12 06:38:14 CST 2009
+
+  * Typo => s/timezome/timezone/ [yanick]
+  * RT#52387 Fix %s formating to use timelocal when no timezone is given
+  * RT#51664 fix str2time('16 Oct 09') to not give a negative result
+
 1.19 -- Fri Sep 25 13:59:41 CDT 2009
 
   * Replace Date::Language::Hungarian with version from CPAN by Lee Goddard

Modified: branches/upstream/libtimedate-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtimedate-perl/current/MANIFEST?rev=50609&op=diff
==============================================================================
--- branches/upstream/libtimedate-perl/current/MANIFEST (original)
+++ branches/upstream/libtimedate-perl/current/MANIFEST Sat Jan  9 23:33:55 2010
@@ -36,7 +36,7 @@
 lib/Date/Parse.pm
 lib/Time/Zone.pm
 Makefile.PL
-MANIFEST
+MANIFEST			This list of files
 README
 t/cpanrt.t
 t/date.t

Modified: branches/upstream/libtimedate-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtimedate-perl/current/META.yml?rev=50609&op=diff
==============================================================================
--- branches/upstream/libtimedate-perl/current/META.yml (original)
+++ branches/upstream/libtimedate-perl/current/META.yml Sat Jan  9 23:33:55 2010
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               TimeDate
-version:            1.19
+version:            1.20
 abstract:           ~
 author:
     - Graham Barr <gbarr at pobox.com>

Modified: branches/upstream/libtimedate-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtimedate-perl/current/Makefile.PL?rev=50609&op=diff
==============================================================================
--- branches/upstream/libtimedate-perl/current/Makefile.PL (original)
+++ branches/upstream/libtimedate-perl/current/Makefile.PL Sat Jan  9 23:33:55 2010
@@ -9,7 +9,7 @@
 WriteMakefile(
   NAME    => 'TimeDate',
   AUTHOR  => 'Graham Barr <gbarr at pobox.com>',
-  VERSION => '1.19',
+  VERSION => '1.20',
   (eval { ExtUtils::MakeMaker->VERSION(6.21) } ? (LICENSE => 'perl') : ()),
   ( eval { ExtUtils::MakeMaker->VERSION(6.46) } ? (
       META_MERGE => {

Modified: branches/upstream/libtimedate-perl/current/SIGNATURE
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtimedate-perl/current/SIGNATURE?rev=50609&op=diff
==============================================================================
--- branches/upstream/libtimedate-perl/current/SIGNATURE (original)
+++ branches/upstream/libtimedate-perl/current/SIGNATURE Sat Jan  9 23:33:55 2010
@@ -14,12 +14,12 @@
 -----BEGIN PGP SIGNED MESSAGE-----
 Hash: SHA1
 
-SHA1 1cfbd5694da3169c17b3648846c9f5e7223f4d26 ChangeLog
-SHA1 205981f550ad232f94d59d8eb79c5e6ecbe8f48d MANIFEST
-SHA1 8e0c2e200e666305e860ca20930ddf7f285825f3 META.yml
-SHA1 6f6d8f3971192224df63d9864dc341078c15286d Makefile.PL
+SHA1 036da21b212a902ecb9d195565bbcd4c51bccecc ChangeLog
+SHA1 efb2a90cd095d97ec148e6263fb921f560cfffb5 MANIFEST
+SHA1 4efed966d43e74a6f53ef2bcdbfc4de05b92035f META.yml
+SHA1 e111caf8b7da35935fa7004a17045cab55278445 Makefile.PL
 SHA1 80cff3b1f65e7df95eaa1a992b688c2c5e1d2b6e README
-SHA1 6823bd5e2e3cac12b7b9870d9840f4606f3eb422 lib/Date/Format.pm
+SHA1 5ca10e18e888daf0883de553219f42ca2422763f lib/Date/Format.pm
 SHA1 08342e72298e839f21236dff7555f2505f928d32 lib/Date/Language.pm
 SHA1 50703aeade60a04398517416d30a2d8918c95578 lib/Date/Language/Afar.pm
 SHA1 f9450ca0047510a4102c32cc4e20a435cdd85b31 lib/Date/Language/Amharic.pm
@@ -53,17 +53,17 @@
 SHA1 20fc6beb32657ca147719f713ff816bbb696da20 lib/Date/Language/TigrinyaEritrean.pm
 SHA1 30f77a43a000f2ce3d22b1b633261a20289025aa lib/Date/Language/TigrinyaEthiopian.pm
 SHA1 54288741c52b09ee92b0487848df74a08cdc3b9e lib/Date/Language/Turkish.pm
-SHA1 dbcc4a151b1c558b32ed61fa7ee98e0fb47b9d7f lib/Date/Parse.pm
+SHA1 b10ec48bd01b73638e4c6dce3f554e4c77267b6c lib/Date/Parse.pm
 SHA1 394c7d372c25107ba5151ceca44c0599188907c7 lib/Time/Zone.pm
-SHA1 62465108c0d5fc14e08ae41e2f963c4d9074b1d6 t/cpanrt.t
+SHA1 ee65cf5b634d907c4cc2d414e49c06175461e6ac t/cpanrt.t
 SHA1 7b16580497a96a4bc551b87b8b97ec89331e81f8 t/date.t
 SHA1 bf6f4a7c599485ab11779c99fc821378e547d26d t/format.t
 SHA1 acef4dd152cd391a3e7a7945c8405a50d965f335 t/getdate.t
 SHA1 501dcb487e33f6b2d4577ef2e6e5f67f038d3c04 t/lang.t
 -----BEGIN PGP SIGNATURE-----
-Version: GnuPG v1.4.9 (Darwin)
+Version: GnuPG v1.4.10 (Darwin)
 
-iEYEARECAAYFAkq9E3QACgkQR0BL4gbYw3QQYACfQg56MxwRuw6XPWOfpumki+CN
-CWAAn1WM3GKmUyJdxf9g95yvZl552Tg0
-=2lbe
+iEYEARECAAYFAksjjt4ACgkQR0BL4gbYw3RCKgCePxf2QrH/3uvOofKewESV0zto
+t+sAnA5dGEi945ziAfAkLyFUhIMWnm7U
+=GqfE
 -----END PGP SIGNATURE-----

Modified: branches/upstream/libtimedate-perl/current/lib/Date/Format.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtimedate-perl/current/lib/Date/Format.pm?rev=50609&op=diff
==============================================================================
--- branches/upstream/libtimedate-perl/current/lib/Date/Format.pm (original)
+++ branches/upstream/libtimedate-perl/current/lib/Date/Format.pm Sat Jan  9 23:33:55 2010
@@ -8,7 +8,7 @@
 use     vars qw(@EXPORT @ISA $VERSION);
 require Exporter;
 
-$VERSION = "2.23";
+$VERSION = "2.24";
 @ISA     = qw(Exporter);
 @EXPORT  = qw(time2str strftime ctime asctime);
 
@@ -215,7 +215,7 @@
 sub format_M { sprintf("%02d",$_[0]->[1]) }
 sub format_q { sprintf("%01d",int($_[0]->[4] / 3) + 1) }
 sub format_s { 
-   $epoch = timegm(@{$_[0]}[0..5])
+   $epoch = timelocal(@{$_[0]}[0..5])
 	unless defined $epoch;
    sprintf("%d",$epoch) 
 }

Modified: branches/upstream/libtimedate-perl/current/lib/Date/Parse.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtimedate-perl/current/lib/Date/Parse.pm?rev=50609&op=diff
==============================================================================
--- branches/upstream/libtimedate-perl/current/lib/Date/Parse.pm (original)
+++ branches/upstream/libtimedate-perl/current/lib/Date/Parse.pm Sat Jan  9 23:33:55 2010
@@ -15,7 +15,7 @@
 @ISA = qw(Exporter);
 @EXPORT = qw(&strtotime &str2time &strptime);
 
-$VERSION = "2.29";
+$VERSION = "2.30";
 
 my %month = (
 	january		=> 0,
@@ -261,7 +261,7 @@
  if (defined $zone) {
    $result = eval {
      local $SIG{__DIE__} = sub {}; # Ick!
-     timegm($ss,$mm,$hh,$day,$month,$year+1900);
+     timegm($ss,$mm,$hh,$day,$month,$year);
    };
    return undef
      if !defined $result
@@ -273,7 +273,7 @@
  else {
    $result = eval {
      local $SIG{__DIE__} = sub {}; # Ick!
-     timelocal($ss,$mm,$hh,$day,$month,$year+1900);
+     timelocal($ss,$mm,$hh,$day,$month,$year);
    };
    return undef
      if !defined $result
@@ -312,7 +312,7 @@
 
 C<str2time> parses C<DATE> and returns a unix time value, or undef upon failure.
 C<ZONE>, if given, specifies the timezone to assume when parsing if the
-date string does not specify a timezome.
+date string does not specify a timezone.
 
 =item strptime(DATE [, ZONE])
 

Modified: branches/upstream/libtimedate-perl/current/t/cpanrt.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtimedate-perl/current/t/cpanrt.t?rev=50609&op=diff
==============================================================================
--- branches/upstream/libtimedate-perl/current/t/cpanrt.t (original)
+++ branches/upstream/libtimedate-perl/current/t/cpanrt.t Sat Jan  9 23:33:55 2010
@@ -1,7 +1,7 @@
-use Date::Format qw(time2str);
-use Date::Parse qw(strptime);
+use Date::Format qw(time2str strftime);
+use Date::Parse qw(strptime str2time);
 
-print "1..5\n";
+print "1..8\n";
 
 my $i = 1;
 
@@ -40,4 +40,16 @@
   print "ok ", $i++, "\n";
 }
 
+{   #   [rt.cpan.org #52387] seconds since the Epoch, UCT 
+  my $time = time;
+  my @lt = localtime(time);
+  print "not " unless strftime("%s", @lt) eq $time;
+  print "ok ", $i++, "\n";
+  print "not " unless time2str("%s",$time) eq $time;
+  print "ok ", $i++, "\n";
+}
 
+{   # [rt.cpan.org #51664]  Change in str2time behaviour between 1.16 and 1.19
+  print "not " if str2time('16 Oct 09') < 0;
+  print "ok ", $i++, "\n";
+}

More information about the Pkg-perl-cvs-commits mailing list