Merge pull request #154 from jaredj/perltidy
perltidy -b lib/Qpsmtpd/Plugin.pm
This commit is contained in:
commit
664990b425
@ -275,7 +275,7 @@ sub store_auth_results {
|
|||||||
};
|
};
|
||||||
my $ar = join('; ', $auths, $result);
|
my $ar = join('; ', $auths, $result);
|
||||||
$self->log(LOGDEBUG, "auth-results: $ar");
|
$self->log(LOGDEBUG, "auth-results: $ar");
|
||||||
$self->qp->connection->notes('authentication_results', $ar );
|
$self->qp->connection->notes('authentication_results', $ar);
|
||||||
}
|
}
|
||||||
|
|
||||||
sub is_immune {
|
sub is_immune {
|
||||||
@ -306,7 +306,7 @@ sub is_naughty {
|
|||||||
my ($self, $setit) = @_;
|
my ($self, $setit) = @_;
|
||||||
|
|
||||||
# see plugins/naughty
|
# 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('naughty', $setit);
|
||||||
$self->connection->notes('rejected', $setit);
|
$self->connection->notes('rejected', $setit);
|
||||||
@ -342,7 +342,7 @@ sub _register_standard_hooks {
|
|||||||
my $hooksub = "hook_$hook";
|
my $hooksub = "hook_$hook";
|
||||||
$hooksub =~ s/\W/_/g;
|
$hooksub =~ s/\W/_/g;
|
||||||
next if !$plugin->can($hooksub);
|
next if !$plugin->can($hooksub);
|
||||||
$plugin->register_hook($hook, $hooksub)
|
$plugin->register_hook($hook, $hooksub);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user