Skip Menu |
 

This queue is for tickets about the MailTools CPAN distribution.

Report information
The Basics
Id: 26237
Status: resolved
Priority: 0/
Queue: MailTools

People
Owner: Nobody in particular
Requestors: at [...] altlinux.ru
Cc:
AdminCc:

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



Subject: [PATCH] qmail.pm: fixed perl syntax
Date: Tue, 10 Apr 2007 22:33:00 +0400
To: bug-mailtools [...] rt.cpan.org
From: Alexey Tourbin <at [...] altlinux.ru>
Download (untitled) / with headers
text/plain 660b
$ perl -c Mail/Mailer/qmail.pm Search pattern not terminated at Mail/Mailer/qmail.pm line 8. $ --- Mail/Mailer/qmail.pm | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/Mail/Mailer/qmail.pm b/Mail/Mailer/qmail.pm index 7eeacd7..e5bfbc1 100644 --- a/Mail/Mailer/qmail.pm +++ b/Mail/Mailer/qmail.pm @@ -5,6 +5,6 @@ require Mail::Mailer::rfc822; sub exec { my($self, $exe, $args, $to, $sender) = @_; - my $address = defined $sender && $sender =~ m/\<(.*?)\> ? $1 : $sender; + my $address = defined $sender && $sender =~ m/\<(.*?)\>/ ? $1 : $sender; exec($exe, (defined $address ? "-f$address" : ())); } -- 1.5.1.GIT
Apparently no-one ever used it. Patch accepted, but will wait until next release (last was today)


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.