oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Updated to take their configurable parameters from the config file.

Browse source
This commit is contained in:
JT Smith 2002-10-13 19:55:39 +00:00
parent 55108689b4
commit 0f2350d4c5
5 changed files with 46 additions and 45 deletions
Download patch file Download diff file Expand all files Collapse all files

7
sbin/Hourly/DeleteExpiredEvents.pm
View file

@ -1,7 +1,5 @@
package Hourly::DeleteExpiredEvents;
my $offset = 0; # in days, time to wait before deleting
#-------------------------------------------------------------------
# WebGUI is Copyright 2001-2002 Plain Black LLC.
#-------------------------------------------------------------------
@ -19,7 +17,10 @@ use WebGUI::SQL;
#-----------------------------------------
sub process {
WebGUI::SQL->write("delete from EventsCalendar_event where endDate<".(time()-(86400*$offset)));
if ($session{config}{DeleteExpiredEvents_offset} ne "") {
WebGUI::SQL->write("delete from EventsCalendar_event where endDate < "
.(time()-(86400*$session{config}{DeleteExpiredEvents}{offset})));
}
}
1;