Fix "no pseudo hash" bug
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@515 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
parent
f096f293c1
commit
7edb1fd93a
@ -59,7 +59,7 @@ sub register {
|
||||
'defer-reject' => 0,
|
||||
@args,
|
||||
};
|
||||
if ($qp->{conn} && $qp->{conn}->isa('Apache2::Connection')) {
|
||||
if ($qp->isa('Qpsmtpd::Apache')) {
|
||||
require APR::Const;
|
||||
APR::Const->import(qw(POLLIN SUCCESS));
|
||||
$self->register_hook('connect', 'hook_connect_apr');
|
||||
|
Loading…
Reference in New Issue
Block a user