Use $level when set in Common::CGI::userlog()

Closes: #665
This commit is contained in:
Xavier Guimard 2013-12-30 11:07:17 +00:00
parent 6fd8f5cb49
commit ebd2240d3d

View File

@ -297,7 +297,7 @@ sub userLog {
my ( $self, $mess, $level ) = @_;
if ( $self->{syslog} ) {
$self->startSyslog();
syslog( 'notice', $mess );
syslog( $level || 'notice', $mess );
}
else {
$self->lmLog( $mess, $level );