X-Git-Url: https://git.rohieb.name/iserv-mod-room-reservation.git/blobdiff_plain/ab0ecf0e86e3168c7a2b987ad67a5e5fda223591..d249a6ce255ae2a16ffea19ba9ca2ac9a495710a:/update-iserv1-iserv2.pl diff --git a/update-iserv1-iserv2.pl b/update-iserv1-iserv2.pl index fcb640e..76b05dc 100755 --- a/update-iserv1-iserv2.pl +++ b/update-iserv1-iserv2.pl @@ -48,7 +48,7 @@ while() { my $hr = $2; $hr = "0$hr" if length $hr < 2; push @tsbeginold, "$hr:$3:00"; - push @tsbegin, Time::Local::timelocal 0, $3, $hr, 1, 0, 1970; + push @tsbegin, Time::Local::timegm 0, $3, $hr, 1, 0, 1970; print " found beginning: $hr:$3\n"; } } @@ -64,7 +64,7 @@ while() { my $hr = $2; $hr = "0$hr" if length $hr < 2; push @tsendold, "$hr:$3:00"; - push @tsend, Time::Local::timelocal 0, $3, $hr, 1, 0, 1970; + push @tsend, Time::Local::timegm 0, $3, $hr, 1, 0, 1970; print " found ending: $hr:$3\n"; } }