From 30fc3fab104e8ee9d1d4f8d20b6a69ea9a6584de Mon Sep 17 00:00:00 2001 From: Graham Knop Date: Tue, 13 Apr 2010 21:14:14 -0500 Subject: [PATCH] fix log->audit and log->security --- lib/WebGUI/Session/ErrorHandler.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/WebGUI/Session/ErrorHandler.pm b/lib/WebGUI/Session/ErrorHandler.pm index 8fa2f454d..0cbb41093 100644 --- a/lib/WebGUI/Session/ErrorHandler.pm +++ b/lib/WebGUI/Session/ErrorHandler.pm @@ -72,7 +72,7 @@ Whatever message you wish to insert into the log. sub audit { my $self = shift; my $message = shift; - @_ = ($self->session->user->username." (".$self->session->user->userId.") ".$message); + @_ = ($self, $self->session->user->username." (".$self->session->user->userId.") ".$message); goto $self->can('info'); } @@ -246,7 +246,7 @@ The message you wish to add to the log. sub security { my $self = shift; my $message = shift; - @_ = ($self->session->user->username." (".$self->session->user->userId.") connecting from " + @_ = ($self, $self->session->user->username." (".$self->session->user->userId.") connecting from " .$self->session->env->getIp." attempted to ".$message); goto $self->can('warn'); }