must export variable
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@242 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
parent
971b696ffa
commit
b2b7602d32
@ -2,7 +2,7 @@ package Qpsmtpd::Constants;
|
||||
use strict;
|
||||
require Exporter;
|
||||
|
||||
my (@common) = qw(OK DECLINED DONE DENY DENYSOFT DENYHARD);
|
||||
my (@common) = qw(OK DECLINED DONE DENY DENYSOFT DENYHARD DENYSOFTHARD);
|
||||
my (@loglevels) = qw(LOGDEBUG LOGINFO LOGNOTICE LOGWARN LOGERROR LOGCRIT LOGALERT LOGEMERG LOGRADAR);
|
||||
|
||||
use vars qw($VERSION @ISA @EXPORT);
|
||||
|
Loading…
Reference in New Issue
Block a user