diff options
| author | Eric Wong <e@80x24.org> | 2020-12-26 12:25:42 +0000 |
|---|---|---|
| committer | Eric Wong <e@80x24.org> | 2020-12-26 20:20:13 +0000 |
| commit | fdbd73069af6eed90030f97def61e669d8d0dc4c (patch) | |
| tree | d3753ea438025f9fb2c1c4d82216a9a5cc320ca9 | |
| parent | e16e09b239b4d8bfd975e5d15be520f01c5da1f6 (diff) | |
| download | public-inbox-fdbd73069af6eed90030f97def61e669d8d0dc4c.tar.gz | |
eml: fix undefined vars on <Perl 5.28
Encode::MIME::Header::_decode_octets did not correctly default to Encode::FB_DEFAULT until Encode 2.93 (perl5.git commit 0c541dc5633a341cf44b818014b58e7f8be532e9). Provide the default again to work with older Perls. Reported-by: Ali Alnubani <alialnu@nvidia.com> Link: https://public-inbox.org/meta/DM6PR12MB49106F8E3BD697B63B943A22DADB0@DM6PR12MB4910.namprd12.prod.outlook.com/ Tested-by: Ali Alnubani <alialnu@nvidia.com> (cherry picked from commit 46bd595f57cc3d425754b0d0770c125616e74448)
| -rw-r--r-- | lib/PublicInbox/Eml.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/PublicInbox/Eml.pm b/lib/PublicInbox/Eml.pm index 571edc5c..4d3fffc0 100644 --- a/lib/PublicInbox/Eml.pm +++ b/lib/PublicInbox/Eml.pm @@ -378,7 +378,9 @@ sub header_str_set { header_set($self, $name, @vals); } -sub mhdr_decode ($) { eval { $MIME_Header->decode($_[0]) } // $_[0] } +sub mhdr_decode ($) { + eval { $MIME_Header->decode($_[0], Encode::FB_DEFAULT) } // $_[0]; +} sub filename { my $dis = header_raw($_[0], 'Content-Disposition'); |