diff options
author | Ævar Arnfjörð Bjarmason <avarab@gmail.com> | 2010-09-30 23:03:31 +0400 |
---|---|---|
committer | Junio C Hamano <gitster@pobox.com> | 2010-10-01 00:06:47 +0400 |
commit | 35b6ab955d2288e1c2671bde67298ed3abe32781 (patch) | |
tree | 72c8599046c206db3056d1cb7ee9185f52937592 | |
parent | 49f73852c80ee681c179ee2eb76b1a792d7b1b22 (diff) |
send-email: extract_valid_address use qr// regexes
Signed-off-by: Ævar Arnfjörð Bjarmason <avarab@gmail.com>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
-rwxr-xr-x | git-send-email.perl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/git-send-email.perl b/git-send-email.perl index 1890409232..db17aae020 100755 --- a/git-send-email.perl +++ b/git-send-email.perl @@ -777,8 +777,8 @@ our ($message_id, %mail, $subject, $reply_to, $references, $message, sub extract_valid_address { my $address = shift; - my $local_part_regexp = '[^<>"\s@]+'; - my $domain_regexp = '[^.<>"\s@]+(?:\.[^.<>"\s@]+)+'; + my $local_part_regexp = qr/[^<>"\s@]+/; + my $domain_regexp = qr/[^.<>"\s@]+(?:\.[^.<>"\s@]+)+/; # check for a local address: return $address if ($address =~ /^($local_part_regexp)$/); |