@@ -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' );
}