loglevel change

git-svn-id: https://svn.perl.org/qpsmtpd/trunk@234 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
Ask Bjørn Hansen 2004-06-05 10:07:03 +00:00
parent a9f0538bcc
commit 76e1119a5e

View File

@ -22,7 +22,7 @@ sub register {
if (@args > 0) {
$self->{_queue_socket} = $args[0];
$self->log(1, "WARNING: Ignoring additional arguments.") if (@args > 1);
$self->log(LOGWARN, "WARNING: Ignoring additional arguments.") if (@args > 1);
} else {
$self->{_queue_socket} = "/var/spool/postfix/public/cleanup";
}