]> Sergey Matveev's repositories - public-inbox.git/blobdiff - lib/PublicInbox/Feed.pm
No ext_urls
[public-inbox.git] / lib / PublicInbox / Feed.pm
index e0810420809e3eb8fce5216eff08e47c83a53add..de1e7dfeb584a5631acb8704d909b51ceedc2223 100644 (file)
@@ -19,14 +19,14 @@ sub generate {
        my ($ctx) = @_;
        my $msgs = $ctx->{msgs} = recent_msgs($ctx);
        return _no_thread() unless @$msgs;
-       PublicInbox::WwwAtomStream->response($ctx, 200, \&generate_i);
+       PublicInbox::WwwAtomStream->response($ctx, \&generate_i);
 }
 
 sub generate_thread_atom {
        my ($ctx) = @_;
        my $msgs = $ctx->{msgs} = $ctx->{ibx}->over->get_thread($ctx->{mid});
        return _no_thread() unless @$msgs;
-       PublicInbox::WwwAtomStream->response($ctx, 200, \&generate_i);
+       PublicInbox::WwwAtomStream->response($ctx, \&generate_i);
 }
 
 sub generate_html_index {
@@ -49,15 +49,15 @@ sub generate_html_index {
 
 sub new_html_i {
        my ($ctx, $eml) = @_;
-       $ctx->zmore($ctx->html_top) if exists $ctx->{-html_tip};
+       print { $ctx->zfh } $ctx->html_top if exists $ctx->{-html_tip};
 
        if ($eml) {
                $ctx->{smsg}->populate($eml) if !$ctx->{ibx}->{over};
                return PublicInbox::View::eml_entry($ctx, $eml);
        }
        my $smsg = shift @{$ctx->{msgs}} or
-               $ctx->zmore(PublicInbox::View::pagination_footer(
-                                               $ctx, './new.html'));
+               print { $ctx->zfh } PublicInbox::View::pagination_footer(
+                                               $ctx, './new.html');
        $smsg;
 }
 
@@ -70,8 +70,9 @@ sub new_html {
        }
        $ctx->{-html_tip} = '<pre>';
        $ctx->{-upfx} = '';
+       $ctx->{-spfx} = '' if $ctx->{ibx}->{coderepo};
        $ctx->{-hr} = 1;
-       PublicInbox::WwwStream::aresponse($ctx, 200, \&new_html_i);
+       PublicInbox::WwwStream::aresponse($ctx, \&new_html_i);
 }
 
 # private subs