[libemail-address-perl] 02/06: once we have a phrase, do not backtrack through it

[Salvatore Bonaccorso]

This is an automated email from the git hooks/post-receive script.

carnil pushed a commit to branch squeeze
in repository libemail-address-perl.

commit ac5fedef217e33b50ff533d987fb95957c8caf5f
Author: Ricardo Signes <rjbs at cpan.org>
Date:   Sat Jun 14 00:10:39 2014 -0400

    once we have a phrase, do not backtrack through it
---
 lib/Email/Address.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Email/Address.pm b/lib/Email/Address.pm
index e5299aa..191259e 100644
--- a/lib/Email/Address.pm
+++ b/lib/Email/Address.pm
@@ -136,7 +136,7 @@ following comment.
 
 $addr_spec  = qr/$local_part\@$domain/;
 $angle_addr = qr/$cfws*<$addr_spec>$cfws*/;
-$name_addr  = qr/$display_name?$angle_addr/;
+$name_addr  = qr/(?>$display_name?)$angle_addr/;
 $mailbox    = qr/(?:$name_addr|$addr_spec)$comment*/;
 
 sub _PHRASE   () { 0 }

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libemail-address-perl.git