[svn:qpsmtpd] r579 - trunk/lib

[email protected] 22 Nov 2005 23:22:49 -0000
Newsgroups perl.cvs.qpsmtpd
Message-ID <[email protected]>
Author: msergeant
Date: Tue Nov 22 15:22:48 2005
New Revision: 579

Modified:
   trunk/lib/Qpsmtpd.pm
Log:
Don't run continuation if config


Modified: trunk/lib/Qpsmtpd.pm
==============================================================================
--- trunk/lib/Qpsmtpd.pm	(original)
+++ trunk/lib/Qpsmtpd.pm	Tue Nov 22 15:22:48 2005
@@ -280,7 +280,7 @@ sub connection {
 
 sub run_hooks {
   my ($self, $hook) = (shift, shift);
-  if ($self->{_continuation} && $hook ne "logging") {
+  if ($self->{_continuation} && $hook ne "logging" && $hook ne "config") {
     die "Continuations in progress from previous hook (this is the $hook hook)";
   }
   my $hooks = $self->{hooks};