about summary refs log tree commit homepage
path: root/lib/PublicInbox/Feed.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/PublicInbox/Feed.pm')
-rw-r--r--lib/PublicInbox/Feed.pm20
1 files changed, 10 insertions, 10 deletions
diff --git a/lib/PublicInbox/Feed.pm b/lib/PublicInbox/Feed.pm
index 9141faaf..279106d2 100644
--- a/lib/PublicInbox/Feed.pm
+++ b/lib/PublicInbox/Feed.pm
@@ -48,15 +48,15 @@ sub generate_html_index {
 }
 
 sub new_html_i {
-        my ($ctx) = @_;
-        return $ctx->html_top if exists $ctx->{-html_tip};
-        my $msgs = $ctx->{msgs};
-        while (my $smsg = shift @$msgs) {
-                my $eml = $ctx->{-inbox}->smsg_eml($smsg) or next;
-                return PublicInbox::View::eml_entry($ctx, $smsg, $eml,
-                                                        scalar @$msgs);
-        }
-        PublicInbox::View::pagination_footer($ctx, './new.html');
+        my ($ctx, $eml) = @_;
+        $ctx->zmore($ctx->html_top) if exists $ctx->{-html_tip};
+
+        $eml and return PublicInbox::View::eml_entry($ctx, $ctx->{smsg}, $eml,
+                                                scalar @{$ctx->{msgs}});
+        my $smsg = shift @{$ctx->{msgs}} or
+                $ctx->zmore(PublicInbox::View::pagination_footer(
+                                                $ctx, './new.html'));
+        $smsg;
 }
 
 sub new_html {
@@ -69,7 +69,7 @@ sub new_html {
         $ctx->{-html_tip} = '<pre>';
         $ctx->{-upfx} = '';
         $ctx->{-hr} = 1;
-        PublicInbox::WwwStream::response($ctx, 200, \&new_html_i);
+        PublicInbox::WwwStream::aresponse($ctx, 200, \&new_html_i);
 }
 
 # private subs