From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: X-Spam-Checker-Version: SpamAssassin 3.4.0 (2014-02-07) on dcvr.yhbt.net X-Spam-Level: X-Spam-ASN: X-Spam-Status: No, score=-4.0 required=3.0 tests=ALL_TRUSTED,BAYES_00 shortcircuit=no autolearn=ham autolearn_force=no version=3.4.0 Received: from localhost (dcvr.yhbt.net [127.0.0.1]) by dcvr.yhbt.net (Postfix) with ESMTP id 439032018A for ; Wed, 15 Jun 2016 00:37:44 +0000 (UTC) From: Eric Wong To: meta@public-inbox.org Subject: [PATCH 4/9] t/mda.t: remove senseless use of Email::Filter Date: Wed, 15 Jun 2016 00:37:37 +0000 Message-Id: <20160615003742.22538-5-e@80x24.org> In-Reply-To: <20160615003742.22538-1-e@80x24.org> References: <20160615003742.22538-1-e@80x24.org> List-Id: Totally unnecessary... --- t/mda.t | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/t/mda.t b/t/mda.t index fdba967..66ba859 100644 --- a/t/mda.t +++ b/t/mda.t @@ -4,7 +4,6 @@ use strict; use warnings; use Test::More; use Email::MIME; -use Email::Filter; use File::Temp qw/tempdir/; use Cwd; use IPC::Run qw(run); @@ -54,8 +53,7 @@ local $ENV{GIT_COMMITTER_NAME} = eval { open(my $fh, '<', $mbox) or die "failed to open mbox: $mbox\n"; my $str = eval { local $/; <$fh> }; close $fh; - my $msg = Email::Filter->new(data => $str); - $msg = Email::MIME->new($msg->simple->as_string); + my $msg = Email::MIME->new($str); my $from = $msg->header('From'); my $author = PublicInbox::Address::from_name($from);