diff options
author | Junio C Hamano <junkio@cox.net> | 2006-10-05 23:40:15 -0700 |
---|---|---|
committer | Junio C Hamano <junkio@cox.net> | 2006-10-05 23:40:15 -0700 |
commit | 7a2a0d214169a5d6f22fc62c4ae6a7ca5b27fb3e (patch) | |
tree | f59e51e784820ffcf4a58aa7db60917aa867c458 /git-send-email.perl | |
parent | ce91c2f6538fc4a905882f2a7a57d814d82b13e8 (diff) | |
download | git-7a2a0d214169a5d6f22fc62c4ae6a7ca5b27fb3e.tar.gz |
git-send-email: real name with period need to be dq-quoted on From: line
An author name like 'A. U. Thor <a.u.thor@example.com>" is not a
valid RFC 2822 address; when placing it on From: line, we would
need to quote it, like this:
Signed-off-by: "Junio C. Hamano" <junkio@cox.net>
Diffstat (limited to 'git-send-email.perl')
-rwxr-xr-x | git-send-email.perl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/git-send-email.perl b/git-send-email.perl index 2fd5e87934..21b3686b2c 100755 --- a/git-send-email.perl +++ b/git-send-email.perl @@ -409,6 +409,11 @@ sub send_message $gitversion = Git::version(); } + my ($author_name) = ($from =~ /^(.*?)\s+</); + if ($author_name =~ /\./ && $author_name !~ /^".*"$/) { + my ($name, $addr) = ($from =~ /^(.*?)(\s+<.*)/); + $from = "\"$name\"$addr"; + } my $header = "From: $from To: $to Cc: $cc |