mirror of
https://github.com/git/git
synced 2024-08-25 02:35:46 +00:00
make git-send-email.perl handle email addresses with no names when Email::Valid is present
When using git-send-email.perl on a changeset that has: Cc: <stable@kernel.org> in the body of the description, and the Email::Valid perl module is installed on the system, the email address will be deemed "invalid" for some reason (Email::Valid isn't smart enough to handle this?) and complain and not send the address the email. Signed-off-by: Greg Kroah-Hartman <gregkh@suse.de> Signed-off-by: Junio C Hamano <gitster@pobox.com>
This commit is contained in:
parent
af83bed690
commit
b06c6bc831
|
@ -410,6 +410,7 @@ sub extract_valid_address {
|
|||
return $address if ($address =~ /^($local_part_regexp)$/);
|
||||
|
||||
if ($have_email_valid) {
|
||||
$address =~ s/^<(.*)>$/$1/;
|
||||
return scalar Email::Valid->address($address);
|
||||
} else {
|
||||
# less robust/correct than the monster regexp in Email::Valid,
|
||||
|
|
Loading…
Reference in a new issue