Added a debug mode.

This commit is contained in:
JT Smith 2002-08-08 03:50:02 +00:00
parent 3ce32801d2
commit f698899ab6
4 changed files with 36 additions and 26 deletions

View file

@ -84,6 +84,7 @@ sub warn {
}
$log = FileHandle->new(">>".$logfile) or fatalError("Can't open log file for warning.");
print $log localtime(time)." ".$0." WARNING: ".$_[0]."\n";
$session{debug}{warning} .= localtime(time)." ".$0." WARNING: ".$_[0]."<p>";
$log->close;
}

View file

@ -210,6 +210,7 @@ sub www_editMiscSettings {
$f = WebGUI::HTMLForm->new;
$f->hidden("op","editMiscSettingsSave");
$f->yesNo("preventProxyCache",WebGUI::International::get(400),$session{setting}{preventProxyCache});
$f->yesNo("showDebug",WebGUI::International::get(707),$session{setting}{showDebug});
$f->select("onCriticalError",\%criticalError,WebGUI::International::get(413),[$session{setting}{onCriticalError}]);
$f->submit;
$output .= $f->print;
@ -223,6 +224,7 @@ sub www_editMiscSettings {
sub www_editMiscSettingsSave {
if (WebGUI::Privilege::isInGroup(3)) {
_saveSetting("preventProxyCache");
_saveSetting("showDebug");
_saveSetting("onCriticalError");
return www_manageSettings();
} else {