# Copyright (C) 2014-2015 all contributors <meta@public-inbox.org>
# License: AGPLv3 or later (https://www.gnu.org/licenses/agpl-3.0.txt)
#
+# Main web interface for mailing list archives
+#
# We focus on the lowest common denominators here:
# - targeted at text-only console browsers (w3m, links, etc..)
# - Only basic HTML, CSS only for line-wrapping <pre> text content for GUIs
my ($ctx) = @_;
require PublicInbox::Feed;
my $srch = searcher($ctx);
- my $q = $ctx->{cgi}->param('q');
footer($ctx);
- if (defined $q) {
+ if (defined $ctx->{cgi}->param('q')) {
require PublicInbox::SearchView;
- PublicInbox::SearchView::sres_top_html($ctx, $q);
+ PublicInbox::SearchView::sres_top_html($ctx);
} else {
PublicInbox::Feed::generate_html_index($ctx);
}
my ($ctx) = @_;
my $x = mid2blob($ctx) or return r404($ctx);
require PublicInbox::Mbox;
- PublicInbox::Mbox::emit1($x);
+ PublicInbox::Mbox::emit1($ctx, $x);
}
# /$LISTNAME/$MESSAGE_ID/ -> HTML content (short quotes)