Skip to content
Browse files

fixed dates

  • Loading branch information...
1 parent 9812185 commit 375a6630457af060736e722159c396a1e32e0162 @barbie committed
Showing with 10 additions and 5 deletions.
  1. +2 −0 Changes
  2. +2 −2 META.json
  3. +2 −2 META.yml
  4. +4 −1 lib/CPAN/Testers/Data/Generator.pm
View
2 Changes
@@ -1,6 +1,8 @@
Revision history for Perl module CPAN::Testers::Data::Generator.
+1.06 2012-11-18
- removed JSON & RSS Recent code.
+ - fixed dates.
1.05 2012-11-13
- parse message fix.
View
4 META.json
@@ -1,6 +1,6 @@
{
"name": "CPAN-Testers-Data-Generator",
- "version": "1.05",
+ "version": "1.06",
"abstract": "CPAN Testers cpanstats Database Generator",
"author": [
"Barbie (BARBIE) <barbie@cpan.org>"
@@ -63,7 +63,7 @@
"provides": {
"CPAN::Testers::Data::Generator": {
"file": "lib/CPAN/Testers/Data/Generator.pm",
- "version": "1.05"
+ "version": "1.06"
}
},
"no_index": {
View
4 META.yml
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: CPAN-Testers-Data-Generator
-version: 1.05
+version: 1.06
abstract: CPAN Testers cpanstats Database Generator
author:
- Barbie <barbie@cpan.org>
@@ -43,7 +43,7 @@ build_requires:
provides:
CPAN::Testers::Data::Generator:
file: lib/CPAN/Testers/Data/Generator.pm
- version: 1.05
+ version: 1.06
no_index:
directory:
View
5 lib/CPAN/Testers/Data/Generator.pm
@@ -4,7 +4,7 @@ use warnings;
use strict;
use vars qw($VERSION);
-$VERSION = '1.05';
+$VERSION = '1.06';
#----------------------------------------------------------------------------
# Library Modules
@@ -1224,6 +1224,9 @@ sub _date_diff {
return -1 unless(@dt1 && @dt2);
+ $dt1[1]--;
+ $dt2[1]--;
+
my $dt1 = timelocal(reverse @dt1);
my $dt2 = timelocal(reverse @dt2);

0 comments on commit 375a663

Please sign in to comment.
Something went wrong with that request. Please try again.