fixed a critical security bug

This commit is contained in:
JT Smith 2005-10-11 16:41:00 +00:00
parent 34b7f63bb5
commit ff206a3290
3 changed files with 12 additions and 5 deletions

View file

@ -304,7 +304,7 @@ The message you wish to add to the log.
sub security {
my $message = shift;
$Log::Log4perl::caller_depth++;
warn($WebGUI::Session::session{user}{username}." (".$WebGUI::Session::session{user}{userId}.") connecting from "
WebGUI::ErrorHandler::warn($WebGUI::Session::session{user}{username}." (".$WebGUI::Session::session{user}{userId}.") connecting from "
.$WebGUI::Session::session{env}{REMOTE_ADDR}." attempted to ".$message);
$Log::Log4perl::caller_depth--;
}