Fixed a bug where interval settings (like sessionTimeout) would not save.

This commit is contained in:
JT Smith 2003-01-24 05:05:55 +00:00
parent 191dadc93e
commit db64e46a75

View file

@ -176,10 +176,17 @@ sub www_manageSettings {
#-------------------------------------------------------------------
sub www_saveSettings {
WebGUI::Privilege::adminOnly() unless (WebGUI::Privilege::isInGroup(3));
my ($key);
my ($key, $value);
foreach $key (keys %{$session{form}}) {
$value = $session{form}{$key};
if ($key =~ m/(.*)_interval/) {
$value = WebGUI::DateTime::intervalToSeconds($session{form}{$key},$session{form}{$1."_units"});
$key = $1;
} elsif ($key =~ m/_units/) {
next;
}
unless ($key eq "op") {
WebGUI::SQL->write("update settings set value=".quote($session{form}{$key})." where name='$key'");
WebGUI::SQL->write("update settings set value=".quote($value)." where name='$key'");
}
}
return www_manageSettings();