The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
Changes 04
LICENSE 33
META.json 33
META.yml 33
Makefile.PL 11
lib/Algorithm/Cron.pm 11
t/90rt84352.t 14
7 files changed (This is a version diff) 1219
@@ -1,5 +1,9 @@
 Revision history for Algorithm-Cron
 
+0.10    2015/05/29 18:45:54
+        [BUGFIXES]
+         * Fix t/90rt84352.t that fails in some timezones (RT103111)
+
 0.09    2014/05/14 17:27:49
         [CHANGES]
          * Sanity-check time fields in the constructor and reject attempts to
@@ -1,4 +1,4 @@
-This software is copyright (c) 2014 by Paul Evans <leonerd@leonerd.org.uk>.
+This software is copyright (c) 2015 by Paul Evans <leonerd@leonerd.org.uk>.
 
 This is free software; you can redistribute it and/or modify it under
 the same terms as the Perl 5 programming language system itself.
@@ -12,7 +12,7 @@ b) the "Artistic License"
 
 --- The GNU General Public License, Version 1, February 1989 ---
 
-This software is Copyright (c) 2014 by Paul Evans <leonerd@leonerd.org.uk>.
+This software is Copyright (c) 2015 by Paul Evans <leonerd@leonerd.org.uk>.
 
 This is free software, licensed under:
 
@@ -272,7 +272,7 @@ That's all there is to it!
 
 --- The Artistic License 1.0 ---
 
-This software is Copyright (c) 2014 by Paul Evans <leonerd@leonerd.org.uk>.
+This software is Copyright (c) 2015 by Paul Evans <leonerd@leonerd.org.uk>.
 
 This is free software, licensed under:
 
@@ -4,7 +4,7 @@
       "Paul Evans <leonerd@leonerd.org.uk>"
    ],
    "dynamic_config" : 1,
-   "generated_by" : "Module::Build version 0.4205",
+   "generated_by" : "Module::Build version 0.421",
    "license" : [
       "perl_5"
    ],
@@ -30,7 +30,7 @@
    "provides" : {
       "Algorithm::Cron" : {
          "file" : "lib/Algorithm/Cron.pm",
-         "version" : "0.09"
+         "version" : "0.10"
       }
    },
    "release_status" : "stable",
@@ -39,5 +39,5 @@
          "http://dev.perl.org/licenses/"
       ]
    },
-   "version" : "0.09"
+   "version" : "0.10"
 }
@@ -6,7 +6,7 @@ build_requires:
   Test::Fatal: '0'
   Test::More: '0.88'
 dynamic_config: 1
-generated_by: 'Module::Build version 0.4205, CPAN::Meta::Converter version 2.133380'
+generated_by: 'Module::Build version 0.421, CPAN::Meta::Converter version 2.142690'
 license: perl
 meta-spec:
   url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -15,10 +15,10 @@ name: Algorithm-Cron
 provides:
   Algorithm::Cron:
     file: lib/Algorithm/Cron.pm
-    version: '0.09'
+    version: '0.10'
 requires:
   Time::timegm: '0'
   perl: '5.008'
 resources:
   license: http://dev.perl.org/licenses/
-version: '0.09'
+version: '0.10'
@@ -1,4 +1,4 @@
-# Note: this file was auto-generated by Module::Build::Compat version 0.4205
+# Note: this file was auto-generated by Module::Build::Compat version 0.4210
 require 5.008;
 use ExtUtils::MakeMaker;
 WriteMakefile
@@ -8,7 +8,7 @@ package Algorithm::Cron;
 use strict;
 use warnings;
 
-our $VERSION = '0.09';
+our $VERSION = '0.10';
 
 my @FIELDS = qw( sec min hour mday mon year wday );
 my @FIELDS_CTOR = grep { $_ ne "year" } @FIELDS;
@@ -29,8 +29,11 @@ my $t = 1364846197;
       crontab => '0 4 * * *',
    );
 
+   my $that_day = ( localtime $t )[3];
+   my $next_day = $that_day + 1;
+
    is( POSIX::strftime( "%Y-%m-%d %H:%M:%S", localtime( $cron->next_time( $t ) ) ),
-       "2013-04-02 04:00:00",
+       "2013-04-0${next_day} 04:00:00",
        'Next time in localtime' );
 }