Author: vetinari
Date: Wed Mar 19 23:27:42 2008
New Revision: 872

Modified:
   trunk/lib/Qpsmtpd.pm

Log:
make hook_*_parse() work again

Modified: trunk/lib/Qpsmtpd.pm
==============================================================================
--- trunk/lib/Qpsmtpd.pm        (original)
+++ trunk/lib/Qpsmtpd.pm        Wed Mar 19 23:27:42 2008
@@ -461,7 +461,9 @@
     last unless $r[0] == DECLINED;
   }
   $r[0] = DECLINED if not defined $r[0];
-  @r = map { split /\n/ } @r;
+  # hook_*_parse() may return a CODE ref..
+  # ... which breaks when splitting as string:
+  @r = map { split /\n/ } @r unless (ref($r[1]) eq "CODE");
   return $self->hook_responder($hook, [EMAIL PROTECTED], $args);
 }
 

Reply via email to