From ca84787578d9ce25e5b81ab71c7bb57234308361 Mon Sep 17 00:00:00 2001
From: Alexey Gladkov <legion@altlinux.org>
Date: Sat, 25 Dec 2021 17:24:11 +0300
Subject: Make PublicInbox::MIME unloadable and make perl.req happy

Signed-off-by: Alexey Gladkov <legion@altlinux.org>
---
 lib/PublicInbox/MIME.pm | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/lib/PublicInbox/MIME.pm b/lib/PublicInbox/MIME.pm
index 831a3d19..5303bad9 100644
--- a/lib/PublicInbox/MIME.pm
+++ b/lib/PublicInbox/MIME.pm
@@ -27,12 +27,10 @@
 package PublicInbox::MIME;
 use strict;
 use warnings;
-use base qw(Email::MIME);
-use Email::MIME::ContentType;
+use Email::Simple;
 use PublicInbox::MsgIter ();
 $Email::MIME::ContentType::STRICT_PARAMS = 0;
 
-if ($Email::MIME::VERSION <= 1.937) {
 sub parts_multipart {
   my $self     = shift;
   my $boundary = $self->{ct}->{attributes}->{boundary};
@@ -105,8 +103,7 @@ sub parts_multipart {
 
   return @{ $self->{parts} };
 }
-}
 
 no warnings 'once';
 *each_part = \&PublicInbox::MsgIter::em_each_part;
-1;
+0;
-- 
2.25.4