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";
}
}
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";
}
}
open OUT, ">", $NEWCFG or die "ERROR: new config file could not be opened: $!";
print OUT "<?php\n\$this->flushTimeslices();\n";
for(my $i = 0; $i <= $#tsbegin; $i++) {
- print OUT "\$this->addTimeslice(new rsTimeslice($tsbegin[$i],$tsend[$i]));\n";
+ print OUT "\$this->addTimeslice(new mod_roomReservationTimeslice($tsbegin[$i],$tsend[$i]));\n";
}
print OUT "\$this->setShowWeekend($showweekend);\n";
print OUT "\$this->setShowLessons($showlessons);\n";
$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";