Check $addr is defined before using it (#266)
Prevent the following error if we receive an invalid RCPT TO (eg <"relaytest%nmap.scanme.org">) Can't call method "qp" on an undefined value at /usr/share/perl5/vendor_perl/Qpsmtpd.pm line 451. /usr/bin/qpsmtpd-forkserver[17472]: command 'rcpt' failed unexpectedly
This commit is contained in:
parent
f8c66145a1
commit
03c9d045f4
@ -448,7 +448,7 @@ sub auth_mechanism {
|
|||||||
sub address {
|
sub address {
|
||||||
my $self = shift;
|
my $self = shift;
|
||||||
my $addr = Qpsmtpd::Address->new(@_);
|
my $addr = Qpsmtpd::Address->new(@_);
|
||||||
$addr->qp($self);
|
$addr->qp($self) if $addr;
|
||||||
return $addr;
|
return $addr;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user