X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=lib%2FPublicInbox%2FSearchView.pm;h=0ae050529ca0601da056463b11ab5acece6ccf25;hb=23a4e44bedabe5b8b651346cabc2a870c5377a30;hp=ea8a45a4e91f6d4416db9b6792d442d44e150e4a;hpb=e00a6f63ef80f3540a159ef4fdc4bba359dc5596;p=public-inbox.git diff --git a/lib/PublicInbox/SearchView.pm b/lib/PublicInbox/SearchView.pm index ea8a45a4..0ae05052 100644 --- a/lib/PublicInbox/SearchView.pm +++ b/lib/PublicInbox/SearchView.pm @@ -6,10 +6,12 @@ package PublicInbox::SearchView; use strict; use warnings; use PublicInbox::SearchMsg; -use PublicInbox::Hval; +use PublicInbox::Hval qw/ascii_html/; use PublicInbox::View; -use PublicInbox::MID qw(mid2path mid_clean); +use PublicInbox::MID qw(mid2path mid_clean mid_mime); use Email::MIME; +require PublicInbox::Git; +require PublicInbox::Thread; our $LIM = 50; sub sres_top_html { @@ -31,10 +33,10 @@ sub sres_top_html { $total = $mset->get_matches_estimated; }; my $err = $@; - my $res = html_start($q, $ctx) . PublicInbox::Hval::PRE; + my $res = html_start($q, $ctx) . '
'; if ($err) { $code = 400; - $res .= err_txt($err) . "
" . foot($ctx); + $res .= err_txt($ctx, $err) . "
" . foot($ctx); } elsif ($total == 0) { $code = 404; $res .= "\n\n[No results found]
".foot($ctx); @@ -42,19 +44,21 @@ sub sres_top_html { my $x = $q->{x}; return sub { adump($_[0], $mset, $q, $ctx) } if ($x eq 'A'); - $res .= search_nav_top($mset, $q); + $res .= search_nav_top($mset, $q) . "\n\n"; if ($x eq 't') { return sub { tdump($_[0], $res, $mset, $q, $ctx) }; } - $res .= "\n\n"; dump_mset(\$res, $mset); - $res .= search_nav_bot($mset, $q) . "\n\n" . foot($ctx); + $res .= '' . search_nav_bot($mset, $q) . + "\n\n" . foot($ctx); } $res .= "