From 09302e177e8dc789c03d9df3620e12e095b4acfb Mon Sep 17 00:00:00 2001 From: Junio C Hamano Date: Tue, 6 Jun 2006 14:12:46 -0700 Subject: send-email: a bit more careful domain regexp. This tightens the regexp a bit to make sure there is no double dots. Signed-off-by: Junio C Hamano diff --git a/git-send-email.perl b/git-send-email.perl index 700d0c3..7b1cca7 100755 --- a/git-send-email.perl +++ b/git-send-email.perl @@ -313,7 +313,7 @@ our ($message_id, $cc, %mail, $subject, $reply_to, $references, $message); sub extract_valid_address { my $address = shift; my $local_part_regexp = '[^<>"\s@]+'; - my $domain_regexp = '[^.<>"\s@]+\.[^<>"\s@]+'; + my $domain_regexp = '[^.<>"\s@]+(?:\.[^.<>"\s@]+)+'; # check for a local address: return $address if ($address =~ /^($local_part_regexp)$/); -- cgit v0.10.2-6-g49f6