On Sat, 4 Mar 2006 19:35:56 +0100
"Peter J. Holzer" <[EMAIL PROTECTED]> wrote:
> I think this got lost during the "why do we need both new and parse?"
> discussion a few months ago. That would explain why it worked with
> 0.28.
> 
> the attached patch should fix it.
If the missing ";" on the previous line is added, yes :)

This and my patch to SMTP.pm fixed the problems we had.

        Hanno
--- ../0.3x/lib/Qpsmtpd/Address.pm      2006-03-04 08:36:21.000000000 +0100
+++ lib/Qpsmtpd/Address.pm      2006-03-06 08:58:06.000000000 +0100
@@ -60,7 +60,8 @@
     my ($class, $user, $host) = @_;
     my $self = {};
     if ($user =~ /^<(.*)>$/ ) {
-       ($user, $host) = $class->canonify($user)
+       ($user, $host) = $class->canonify($user);
+       return undef unless defined $user;
     }
     elsif ( not defined $host ) {
        my $address = $user;

Reply via email to