about summary refs log tree commit homepage
path: root/t
diff options
authorEric Wong <e@yhbt.net>2020-02-26 10:21:12 +0000
committerEric Wong <e@yhbt.net>2020-03-01 17:18:53 -0600
commit03255d56a53d390a7f7bb069e0f1c6ea5d34756c (patch)
treeded98a63726e1600893d12d3e6f35ab080e1febc /t
parent9dfddf147f4c8e45eae18d3684e9f60c8a631704 (diff)
import: drop '<' and '>' characters in addresses
Some strange "From:" lines will cause Email::Address::XS to
leave '<' (and presumably '>') in the address which
git-fast-import won't accept even if quoted.  Workaround this
problem by deleting '<' and '>' the same way we delete them for
the ident name.

Reported-by: Leah Neukirchen <leah@vuxu.org>
Link: https://public-inbox.org/meta/87h7zfemur.fsf@vuxu.org/
Diffstat (limited to 't')
1 files changed, 2 insertions, 0 deletions
diff --git a/t/import.t b/t/import.t
index e71dd714..b88d308e 100644
--- a/t/import.t
+++ b/t/import.t
@@ -55,6 +55,8 @@ $im->done;
 my @revs = $git->qx(qw(rev-list HEAD));
 is(scalar @revs, 1, 'one revision created');
+my $odd = '"=?iso-8859-1?Q?J_K=FCpper?= <usenet"@example.de';
+$mime->header_set('From', $odd);
 $mime->header_set('Message-ID', '<b@example.com>');
 $mime->header_set('Subject', 'msg2');
 like($im->add($mime, sub { $mime }), qr/\A:\d+\z/, 'added 2nd message');