summaryrefslogtreecommitdiff
path: root/git-send-email.perl
diff options
context:
space:
mode:
authorKumar Gala <galak@kernel.crashing.org>2007-07-24 09:50:38 -0500
committerJunio C Hamano <gitster@pobox.com>2007-07-24 17:28:10 -0700
commit2d8ae400d134c326f3ab0ec15ae522fb74cd0b1d (patch)
treeafb5592ddb7c6a2fa49e38341338532d4c921ad2 /git-send-email.perl
parentf836f1ae9b1535d6a1aeb4a0e8a33d65edaf9ff8 (diff)
downloadgit-2d8ae400d134c326f3ab0ec15ae522fb74cd0b1d.tar.gz
send-email: Update regex parsing for pine aliases
The pine address book format is tab seperated and the first field is the nickname/alias and the third field is the email address as per: http://www.washington.edu/pine/tech-notes/low-level.html Signed-off-by: Kumar Gala <galak@kernel.crashing.org> Signed-off-by: Junio C Hamano <gitster@pobox.com>
Diffstat (limited to 'git-send-email.perl')
-rwxr-xr-xgit-send-email.perl2
1 files changed, 1 insertions, 1 deletions
diff --git a/git-send-email.perl b/git-send-email.perl
index a09b1c9650..f43f92f957 100755
--- a/git-send-email.perl
+++ b/git-send-email.perl
@@ -237,7 +237,7 @@ my %parse_alias = (
$aliases{$1} = [ split(/\s+/, $2) ];
}}},
pine => sub { my $fh = shift; while (<$fh>) {
- if (/^(\S+)\s+(.*)$/) {
+ if (/^(\S+)\t.*\t(.*)$/) {
$aliases{$1} = [ split(/\s*,\s*/, $2) ];
}}},
gnus => sub { my $fh = shift; while (<$fh>) {