From a9c1a93cfa88e19477e025ce4f451086e5d0213e Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Tue, 15 Apr 2014 06:00:16 +0000 Subject: mda: encoding-aware From: for GIT_ authorship Users with non-US-ASCII compatible names were not showing up properly in "git log" output. --- public-inbox-mda | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/public-inbox-mda b/public-inbox-mda index 6e66fa71..2335cd3e 100755 --- a/public-inbox-mda +++ b/public-inbox-mda @@ -7,6 +7,8 @@ my $usage = 'public-inbox-mda < rfc2822_message'; use Email::Filter; use Email::Address; +use Encode qw/decode encode/; +use Encode::MIME::Header; use File::Path::Expand qw/expand_filename/; use IPC::Run qw(run); use constant MDA => 'ssoma-mda'; @@ -45,7 +47,8 @@ if (PublicInbox->precheck($filter, $recipient) && set_list_headers($simple, $dst); $filter->simple($simple); - my $from = $filter->from; + my $from = decode('MIME-Header', $filter->from); + $from = encode("utf8", $from); my @from = Email::Address->parse($from); my $name = $from[0]->name; defined $name or $name = ""; -- cgit v1.2.3-24-ge0c7