diff options
Diffstat (limited to 'lib/PublicInbox/WwwStream.pm')
| -rw-r--r-- | lib/PublicInbox/WwwStream.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/PublicInbox/WwwStream.pm b/lib/PublicInbox/WwwStream.pm index 6de1b310..d9abb5ab 100644 --- a/lib/PublicInbox/WwwStream.pm +++ b/lib/PublicInbox/WwwStream.pm @@ -39,7 +39,8 @@ sub _html_top ($) { } # XXX gross, for SearchView.pm my $extra = $ctx->{-extra_form_html} || ''; - $top = qq{<form\naction="$upfx"><pre>$top} . + my $action = $upfx eq '' ? './' : $upfx; + $top = qq{<form\naction="$action"><pre>$top} . qq{ <input\nname=q\ntype=text$q_val/>} . $extra . qq{<input\ntype=submit\nvalue=search />} . |