X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=lib%2FPublicInbox%2FWwwAttach.pm;h=5b2914b393fdcc28ea3d220eeac3137004ae3b8d;hp=b10099077e1b2591a736b3483d49c7fb83dbf519;hb=46742d95647c7a80cb2f60d5c134717dd91e22e2;hpb=3b1b7abf814dbc7f2a737b2ca0e12b0fa518ff44 diff --git a/lib/PublicInbox/WwwAttach.pm b/lib/PublicInbox/WwwAttach.pm index b1009907..5b2914b3 100644 --- a/lib/PublicInbox/WwwAttach.pm +++ b/lib/PublicInbox/WwwAttach.pm @@ -7,8 +7,7 @@ use strict; use warnings; use bytes (); # only for bytes::length use Email::MIME::ContentType qw(parse_content_type); -use PublicInbox::MIME; -use PublicInbox::MsgIter; +use PublicInbox::Eml; sub get_attach_i { # ->each_part callback my ($part, $depth, $idx) = @{$_[0]}; @@ -38,7 +37,7 @@ sub get_attach ($$$) { my ($ctx, $idx, $fn) = @_; my $res = [ 404, [ 'Content-Type', 'text/plain' ], [ "Not found\n" ] ]; my $mime = $ctx->{-inbox}->msg_by_mid($ctx->{mid}) or return $res; - $mime = PublicInbox::MIME->new($mime); + $mime = PublicInbox::Eml->new($mime); $res->[3] = $idx; $mime->each_part(\&get_attach_i, $res, 1); pop @$res; # cleanup before letting PSGI server see it