X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=Documentation%2Fmknews.perl;h=f053e2bfb9e558541778762a4d6b3b79bd0b633d;hb=43b66634d508a1cd81023b5d567abae3804420c4;hp=51d54b7167c19c8517b3e21787515f839b6e960d;hpb=55263c56cf41c87f8977cd6a6be65ac07b5cea87;p=public-inbox.git diff --git a/Documentation/mknews.perl b/Documentation/mknews.perl index 51d54b71..f053e2bf 100755 --- a/Documentation/mknews.perl +++ b/Documentation/mknews.perl @@ -103,9 +103,10 @@ sub mime2txt { sub mime2html { my ($out, $eml, $ctx) = @_; - my $smsg = bless {}, 'PublicInbox::Smsg'; + my $smsg = $ctx->{smsg} = bless {}, 'PublicInbox::Smsg'; $smsg->populate($eml); - print $out PublicInbox::View::eml_entry($ctx, $smsg, $eml, 1) or die; + $ctx->{msgs} = [ 1 ]; # for
in eml_entry + print $out PublicInbox::View::eml_entry($ctx, $eml) or die; } sub html_start {