aboutsummaryrefslogtreecommitdiffstats
path: root/git-send-email.perl
diff options
context:
space:
mode:
authorJunio C Hamano <gitster@pobox.com>2018-01-23 13:16:41 -0800
committerJunio C Hamano <gitster@pobox.com>2018-01-23 13:16:41 -0800
commit897de845e62ddccba5310057b64d568bc3d4e182 (patch)
tree8391954c015fb3097af96aa38c1cd3190929e25e /git-send-email.perl
parentMerge branch 'ab/doc-cat-file-e-still-shows-errors' (diff)
parentsend-email: add test for Linux's get_maintainer.pl (diff)
downloadgit-897de845e62ddccba5310057b64d568bc3d4e182.tar.gz
git-897de845e62ddccba5310057b64d568bc3d4e182.zip
Merge branch 'mm/send-email-fallback-to-local-mail-address'
Instead of maintaining home-grown email address parsing code, ship a copy of reasonably recent Mail::Address to be used as a fallback in 'git send-email' when the platform lacks it. * mm/send-email-fallback-to-local-mail-address: send-email: add test for Linux's get_maintainer.pl perl/Git: remove now useless email-address parsing code send-email: add and use a local copy of Mail::Address
Diffstat (limited to 'git-send-email.perl')
-rwxr-xr-xgit-send-email.perl3
1 files changed, 2 insertions, 1 deletions
diff --git a/git-send-email.perl b/git-send-email.perl
index edcc6d3469..340b5c8482 100755
--- a/git-send-email.perl
+++ b/git-send-email.perl
@@ -30,6 +30,7 @@ use Error qw(:try);
use Cwd qw(abs_path cwd);
use Git;
use Git::I18N;
+use Git::Mail::Address;
Getopt::Long::Configure qw/ pass_through /;
@@ -489,7 +490,7 @@ my ($repoauthor, $repocommitter);
($repocommitter) = Git::ident_person(@repo, 'committer');
sub parse_address_line {
- return Git::parse_mailboxes($_[0]);
+ return map { $_->format } Mail::Address->parse($_[0]);
}
sub split_addrs {