Commit d4372eae authored by Christophe Maudoux's avatar Christophe Maudoux 🐛

Fix month value (#2049)

parent d53aff9c
...@@ -11,7 +11,7 @@ use Time::Local; ...@@ -11,7 +11,7 @@ use Time::Local;
use DBI; use DBI;
use Encode; use Encode;
our $VERSION = '2.0.7'; our $VERSION = '2.0.8';
extends 'Lemonldap::NG::Common::Notifications'; extends 'Lemonldap::NG::Common::Notifications';
...@@ -220,6 +220,7 @@ sub getDone { ...@@ -220,6 +220,7 @@ sub getDone {
my $result; my $result;
while ( my $h = $self->sth->fetchrow_hashref() ) { while ( my $h = $self->sth->fetchrow_hashref() ) {
my @t = split( /\D+/, $h->{date} ); my @t = split( /\D+/, $h->{date} );
$t[1]--;
my $done = my $done =
timelocal( $t[5] || 0, $t[4] || 0, $t[3] || 0, $t[2], $t[1], $t[0] ); timelocal( $t[5] || 0, $t[4] || 0, $t[3] || 0, $t[2], $t[1], $t[0] );
$result->{"$h->{date}#$h->{uid}#$h->{ref}"} = $result->{"$h->{date}#$h->{uid}#$h->{ref}"} =
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment