diff options
author | Eric Wong <e@80x24.org> | 2019-06-15 20:23:42 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2019-06-15 20:25:25 +0000 |
commit | f3afddbe621614f684c2e855a24060fca8dce803 (patch) | |
tree | fc4376fb0e326ab71c08430245a18b86581756d5 | |
parent | 0f7c7d634f3018591dee65650bbc6f6a5cc18dbc (diff) | |
download | public-inbox-f3afddbe621614f684c2e855a24060fca8dce803.tar.gz |
I could not find a place to put the link the top without making navigation too cluttered. Putting it at the bottom of the page seems reasonable...
-rw-r--r-- | lib/PublicInbox/SearchView.pm | 4 | ||||
-rw-r--r-- | t/psgi_v2.t | 2 |
2 files changed, 4 insertions, 2 deletions
diff --git a/lib/PublicInbox/SearchView.pm b/lib/PublicInbox/SearchView.pm index f0d803ea..6f07279b 100644 --- a/lib/PublicInbox/SearchView.pm +++ b/lib/PublicInbox/SearchView.pm @@ -232,7 +232,9 @@ sub search_nav_bot { $rv .= qq{ <a\nhref="?$next"\nrel=next>next</a>} if $next; $rv .= $join if $join; $rv .= qq{<a\nhref="?$prev"\nrel=prev>prev</a>} if $prev; - $rv .= '</pre>'; + + my $rev = $q->qs_html(o => $o < 0 ? 0 : -1); + $rv .= qq{ | <a\nhref="?$rev">reverse results</a></pre>}; } sub sort_relevance { diff --git a/t/psgi_v2.t b/t/psgi_v2.t index 5c358cde..b8062de2 100644 --- a/t/psgi_v2.t +++ b/t/psgi_v2.t @@ -155,7 +155,7 @@ test_psgi(sub { $www->call(@_) }, sub { $res = $cb->(GET('/v2test/?q=m:a-mid@b&x=t')); is($res->code, 200, 'success with threaded search'); my $raw = $res->content; - ok($raw =~ s/\A.*>Results 1-3 of 3<//s, 'got all results'); + ok($raw =~ s/\A.*>Results 1-3 of 3\b//s, 'got all results'); my @over = ($raw =~ m/\d{4}-\d+-\d+\s+\d+:\d+ (.+)$/gm); is_deeply(\@over, [ '<a', '` <a', '` <a' ], 'threaded messages show up'); |