Skip Menu |
 

This queue is for tickets about the Mail-Sender CPAN distribution.

Report information
The Basics
Id: 87198
Status: new
Priority: 0/
Queue: Mail-Sender

People
Owner: Nobody in particular
Requestors: rurban [...] x-ray.at
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)

Attachments


Subject: [PATCH] wrong return precedence
Download (untitled) / with headers
text/plain 132b
returns bind stronger than and, so the expression after and is ignored. See https://rt.perl.org/rt3/Public/Bug/Display.html?id=59802
Subject: Mail-Sender-0.8.22-returnor.patch
diff -bu Mail-Sender-0.8.22-yucIHQ/Sender.pm~ Mail-Sender-0.8.22-yucIHQ/Sender.pm --- Mail-Sender-0.8.22-yucIHQ/Sender.pm~ 2012-12-12 10:29:40.000000000 -0700 +++ Mail-Sender-0.8.22-yucIHQ/Sender.pm 2013-07-20 21:42:51.258707421 -0600 @@ -2679,7 +2679,7 @@ # if (!defined($self->{'smtpaddr'})) { return $self->Error(HOSTNOTFOUND($self->{'smtp'})); } if (exists $self->{'on_errors'} and (!defined($self->{'on_errors'}) or $self->{'on_errors'} eq 'undef')) { - return $self->Connect() and $self->Close() and 1; + return $self->Connect() && $self->Close() && 1; } elsif (exists $self->{'on_errors'} and $self->{'on_errors'} eq 'die') { $self->Connect(); $self->Close();


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.