qmail_deliverable: test variable if defined before accessing

This commit is contained in:
Matt Simerson 2012-06-27 20:17:00 -04:00
parent 6f34fbb6cd
commit e3fcd08706

View File

@ -77,7 +77,7 @@ sub register {
$self->log(LOGWARN, "Odd number of arguments, using default config");
} else {
my %args = @args;
if ($args{server} =~ /^smtproutes:/) {
if ($args{server} && $args{server} =~ /^smtproutes:/) {
my ($fallback, $port) = $args{server} =~ /:(?:(.*?):?)(\d+)/;