diff options
| -rw-r--r-- | rhimport.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rhimport.pm b/rhimport.pm index c9035c0..66e37f7 100644 --- a/rhimport.pm +++ b/rhimport.pm @@ -63,7 +63,7 @@ sub get_rd_week my $now = DateTime->now(); my $tz = DateTime::TimeZone->new(name => 'Europe/Vienna'); my $tz_offset = $tz->offset_for_datetime($now); - my $sEpoch = $now->epoch() + $tz_offset; + my $sEpoch = $now->epoch() + $tz_offset; my $week = floor(((($sEpoch + 259200)/604800) + 2) % 4) + 1; return $week; |