X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=lib%2FPublicInbox%2FMIME.pm;h=9077386ac2123fab3c28e57d7e8d65f239e9a48b;hb=0283273a14e1871955f6a9132f4f3f7884ec8a3f;hp=456eed64b8c444647c75bb1c21fa10ec512ad484;hpb=cfb8d16578e7f2f2e300f9f436205e4a8fc7f322;p=public-inbox.git diff --git a/lib/PublicInbox/MIME.pm b/lib/PublicInbox/MIME.pm index 456eed64..9077386a 100644 --- a/lib/PublicInbox/MIME.pm +++ b/lib/PublicInbox/MIME.pm @@ -3,6 +3,9 @@ # # The license for this file differs from the rest of public-inbox. # +# We no longer load this in any of our code outside of maintainer +# tests for compatibility. +# # It monkey patches the "parts_multipart" subroutine with patches # from Matthew Horsfall at: # @@ -24,6 +27,7 @@ use strict; use warnings; use base qw(Email::MIME); use Email::MIME::ContentType; +use PublicInbox::MsgIter (); $Email::MIME::ContentType::STRICT_PARAMS = 0; if ($Email::MIME::VERSION <= 1.937) { @@ -101,4 +105,6 @@ sub parts_multipart { } } +no warnings 'once'; +*each_part = \&PublicInbox::MsgIter::em_each_part; 1;