X-Git-Url: https://git.rohieb.name/iserv-mod-room-reservation.git/blobdiff_plain/ab0ecf0e86e3168c7a2b987ad67a5e5fda223591..1d6ece3b691d591e2d8fd1f044e268fdb67edef0:/update-iserv1-iserv2.pl

diff --git a/update-iserv1-iserv2.pl b/update-iserv1-iserv2.pl
index fcb640e..c0f219a 100755
--- a/update-iserv1-iserv2.pl
+++ b/update-iserv1-iserv2.pl
@@ -48,7 +48,7 @@ while(<IN>) {
         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(<IN>) {
         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";
       }
     }
@@ -222,8 +222,9 @@ foreach(IServ::DB::GetArr("SELECT * FROM mod_roomreservation_bookings_old;")) {
     $row{"reason"}, "rrb_interval" => $row{"fixed"} };
 }
 
-# delete old table
+# delete old tables
 IServ::DB::Exec "DROP TABLE mod_roomreservation_bookings_old;";
+IServ::DB::Exec "DROP TABLE rooms_archive;";
 
 print "done.\n";