X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=lib%2FPublicInbox%2FFilter%2FVger.pm;h=2c73738d82cc89a6ed1a19ae8537f0b265d868eb;hp=e746238c7e6c1abcdbac883b5fe84d49d059c157;hb=46742d95647c7a80cb2f60d5c134717dd91e22e2;hpb=3b1b7abf814dbc7f2a737b2ca0e12b0fa518ff44 diff --git a/lib/PublicInbox/Filter/Vger.pm b/lib/PublicInbox/Filter/Vger.pm index e746238c..2c73738d 100644 --- a/lib/PublicInbox/Filter/Vger.pm +++ b/lib/PublicInbox/Filter/Vger.pm @@ -5,7 +5,7 @@ package PublicInbox::Filter::Vger; use base qw(PublicInbox::Filter::Base); use strict; -use warnings; +use PublicInbox::Eml; my $l0 = qr/-+/; # older messages only had one '-' my $l1 = @@ -25,7 +25,7 @@ sub scrub { # so in multipart (e.g. GPG-signed) messages, the list trailer # becomes invisible to MIME-aware email clients. if ($s =~ s/$l0\n$l1\n$l2\n$l3\n($l4\n)?\z//os) { - $mime = PublicInbox::MIME->new(\$s); + $mime = PublicInbox::Eml->new(\$s); } $self->ACCEPT($mime); }