about summary refs log tree commit homepage
path: root/Documentation/mknews.perl
diff options
context:
space:
mode:
Diffstat (limited to 'Documentation/mknews.perl')
-rwxr-xr-xDocumentation/mknews.perl7
1 files changed, 4 insertions, 3 deletions
diff --git a/Documentation/mknews.perl b/Documentation/mknews.perl
index 3bdebfce..965c30c1 100755
--- a/Documentation/mknews.perl
+++ b/Documentation/mknews.perl
@@ -102,9 +102,10 @@ sub mime2txt {
 }
 
 sub mime2html {
-        my ($out, $mime, $ctx) = @_;
-        my $smsg = bless { mime => $mime }, 'PublicInbox::Smsg';
-        print $out PublicInbox::View::index_entry($smsg, $ctx, 1) or die;
+        my ($out, $eml, $ctx) = @_;
+        my $smsg = bless {}, 'PublicInbox::Smsg';
+        $smsg->populate($eml);
+        print $out PublicInbox::View::eml_entry($ctx, $smsg, $eml, 1) or die;
 }
 
 sub html_start {