diff options
author | Eric Wong <e@80x24.org> | 2022-09-02 09:10:53 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2022-09-02 17:40:04 +0000 |
commit | 4fe706e6a86da985755cd101bc52ce813d044554 (patch) | |
tree | d859999be44922e56f0386dcc86a824a345908a3 | |
parent | e512d54b21ddea2228fc19a3c5a19fa4b73c6040 (diff) | |
download | public-inbox-4fe706e6a86da985755cd101bc52ce813d044554.tar.gz |
For /$INBOX/$MSGID/ pages, we need to point all nav bar links ../ regardless of whether ->over exists. I've also verified this doesn't affect /$INBOX/new.html at all.
-rw-r--r-- | lib/PublicInbox/View.pm | 2 | ||||
-rw-r--r-- | t/plack.t | 3 |
2 files changed, 3 insertions, 2 deletions
diff --git a/lib/PublicInbox/View.pm b/lib/PublicInbox/View.pm index 2e5228e1..11a94ba9 100644 --- a/lib/PublicInbox/View.pm +++ b/lib/PublicInbox/View.pm @@ -678,7 +678,7 @@ sub _msg_page_prepare_obuf { $ctx->{chash} = content_hash($eml) if $ctx->{smsg}; # reused MID $rv .= "<pre\nid=b>"; # anchor for body start } - $ctx->{-upfx} = '../' if $have_over; + $ctx->{-upfx} = '../'; my @title; # (Subject[0], From[0]) for my $v ($eml->header('From')) { my @n = PublicInbox::Address::names($v); @@ -1,5 +1,5 @@ #!perl -w -# Copyright (C) 2014-2021 all contributors <meta@public-inbox.org> +# Copyright (C) all contributors <meta@public-inbox.org> # License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt> use strict; use v5.10.1; @@ -154,6 +154,7 @@ my $c1 = sub { $res = $cb->(GET($pfx . $path)); is(200, $res->code, "success for $path"); my $html = $res->content; + like($html, qr!\bhref="\Q../_/text/help/"!, 'help available'); like($html, qr!<title>hihi - Me</title>!, 'HTML returned'); like($html, qr!<a\nhref=raw!s, 'raw link present'); like($html, qr!> quoted text!s, 'quoted text inline'); |