lib/PublicInbox/View.pm | 2 ++ diff --git a/lib/PublicInbox/View.pm b/lib/PublicInbox/View.pm index 64e73234f9ee2b17ca4efc4d5094d402426ee6d8..a6944b80bbed08ca41c702c234b1010571b1e5ac 100644 --- a/lib/PublicInbox/View.pm +++ b/lib/PublicInbox/View.pm @@ -533,6 +533,7 @@ return unless $part->{bdy}; my $nl = $idx eq '1' ? '' : "\n"; # like join("\n", ...) my $size = length($part->body); + delete $part->{bdy}; # save memory # hide attributes normally, unless we want to aid users in # spotting MUA problems: @@ -632,6 +633,7 @@ # badly-encoded message with $err? tell the world about it! attach_link($ctx, $ct, $p, $fn, $err); $$rv .= "\n"; } + delete $part->{bdy}; # save memory foreach my $cur (@sections) { if ($cur =~ /\A>/) { # we use a here to allow users to specify