perltidy -b lib/Qpsmtpd/Plugin.pm

This commit is contained in:
Jared Johnson 2014-11-14 15:24:30 -06:00
parent a20ced01f6
commit 971e6ab0e8

View File

@ -275,7 +275,7 @@ sub store_auth_results {
};
my $ar = join('; ', $auths, $result);
$self->log(LOGDEBUG, "auth-results: $ar");
$self->qp->connection->notes('authentication_results', $ar );
$self->qp->connection->notes('authentication_results', $ar);
}
sub is_immune {
@ -306,7 +306,7 @@ sub is_naughty {
my ($self, $setit) = @_;
# see plugins/naughty
return $self->connection->notes('naughty') if ! defined $setit;
return $self->connection->notes('naughty') if !defined $setit;
$self->connection->notes('naughty', $setit);
$self->connection->notes('rejected', $setit);
@ -342,7 +342,7 @@ sub _register_standard_hooks {
my $hooksub = "hook_$hook";
$hooksub =~ s/\W/_/g;
next if !$plugin->can($hooksub);
$plugin->register_hook($hook, $hooksub)
$plugin->register_hook($hook, $hooksub);
}
}