[libemail-address-perl] 05/06: quoted part can be empty

[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 4aca98f3bfacea25c51440ed9008480a4919c9c7
Author: Ricardo Signes <rjbs at cpan.org>
Date:   Tue Jun 17 22:48:03 2014 -0400

    quoted part can be empty
---
 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 38b2631..61c5e95 100644
--- a/lib/Email/Address.pm
+++ b/lib/Email/Address.pm
@@ -65,7 +65,7 @@ my $dot_atom       = qr/$cfws*$dot_atom_text$cfws*/;
 
 my $qtext          = qr/[^\\"]/;
 my $qcontent       = qr/$qtext|$quoted_pair/;
-my $quoted_string  = qr/$cfws*"$qcontent+"$cfws*/;
+my $quoted_string  = qr/$cfws*"$qcontent*"$cfws*/;
 
 my $word           = qr/$atom|$quoted_string/;
 

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