X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=lib%2FPublicInbox%2FFeed.pm;h=045e495fae9ed8acfe133743451f126014dd3323;hb=aab9613eb8f335c1cfeaec37c0794656a3cbcfee;hp=07774cbf1a3ca2848fa43f6ea0f325a838bc9f2c;hpb=90f12caa6c481c169cf3b6b1261856b013a8fdc8;p=public-inbox.git diff --git a/lib/PublicInbox/Feed.pm b/lib/PublicInbox/Feed.pm index 07774cbf..045e495f 100644 --- a/lib/PublicInbox/Feed.pm +++ b/lib/PublicInbox/Feed.pm @@ -109,20 +109,11 @@ sub emit_atom_thread { end_feed($fh); } -sub emit_html_index { - my ($res, $ctx) = @_; - my $feed_opts = get_feedopts($ctx); - my $fh = $res->([200,['Content-Type'=>'text/html; charset=UTF-8']]); - - my $max = $ctx->{max} || MAX_PER_PAGE; +sub _html_index_top { + my ($feed_opts, $srch) = @_; my $title = ascii_html($feed_opts->{description} || ''); - my ($footer, $param, $last); - my $state = { ctx => $ctx, seen => {}, anchor_idx => 0, fh => $fh }; - my $srch = $ctx->{srch}; - my $top = "$title (Atom feed)"; - if ($srch) { $top = qq{