From bdd20fed4d304465911663171db9266f4cdafe91 Mon Sep 17 00:00:00 2001 From: Robert Spier Date: Sat, 4 Sep 2004 00:57:16 +0000 Subject: [PATCH] indentation and whitespace cleanup git-svn-id: https://svn.perl.org/qpsmtpd/trunk@295 958fd67b-6ff1-0310-b445-bb7760255be9 --- lib/Qpsmtpd.pm | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/lib/Qpsmtpd.pm b/lib/Qpsmtpd.pm index 33e93fd..ca681c0 100644 --- a/lib/Qpsmtpd.pm +++ b/lib/Qpsmtpd.pm @@ -232,14 +232,14 @@ sub run_hooks { ."running the $hook hook returned undef!") and next; - # should we have a hook for "OK" too? + # should we have a hook for "OK" too? if ($r[0] == DENY or $r[0] == DENYSOFT) { - $r[1] = "" if not defined $r[1]; - $self->log(LOGDEBUG, "Plugin $code->{name}, hook $hook returned $r[0], $r[1]"); - $self->run_hooks("deny", $code->{name}, $r[0], $r[1]) unless ($hook eq "deny"); + $r[1] = "" if not defined $r[1]; + $self->log(LOGDEBUG, "Plugin $code->{name}, hook $hook returned $r[0], $r[1]"); + $self->run_hooks("deny", $code->{name}, $r[0], $r[1]) unless ($hook eq "deny"); } - last unless $r[0] == DECLINED; + last unless $r[0] == DECLINED; } $r[0] = DECLINED if not defined $r[0]; return @r;