send-email: Update regex parsing for pine aliases
authorKumar Gala <galak@kernel.crashing.org>
Tue, 24 Jul 2007 14:50:38 +0000 (09:50 -0500)
committerJunio C Hamano <gitster@pobox.com>
Wed, 25 Jul 2007 00:28:10 +0000 (17:28 -0700)
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>
git-send-email.perl

index a09b1c9..f43f92f 100755 (executable)
@@ -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>) {