about summary refs log tree commit homepage
path: root/lib/PublicInbox
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2016-06-30 18:59:12 +0000
committerEric Wong <e@80x24.org>2016-06-30 19:03:08 +0000
commitd766499de41c8409d10d377bb0faaad1413028b9 (patch)
treefe6e9d35d999110db94fc523894d1165df8ecd4a /lib/PublicInbox
parent645b5c06e789ddc9d97e76c1d4445ae9b7022599 (diff)
downloadpublic-inbox-d766499de41c8409d10d377bb0faaad1413028b9.tar.gz
Oops :x  I really need to whip check-inbox.perl into
shape or at least start running it, again.

Fixes: e29518088b3f ("view: fix up some HTML injection via Message-ID vectors")
Diffstat (limited to 'lib/PublicInbox')
-rw-r--r--lib/PublicInbox/View.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/PublicInbox/View.pm b/lib/PublicInbox/View.pm
index 11d8dd53..140cfeed 100644
--- a/lib/PublicInbox/View.pm
+++ b/lib/PublicInbox/View.pm
@@ -138,8 +138,8 @@ sub index_entry {
         $rv .= "From: "._hdr_names($hdr, 'From').' @ '._msg_date($hdr)." UTC";
         my $upfx = $ctx->{-upfx};
         my $mhref = $upfx . $mid->as_href . '/';
-        $rv .= qq{ (<a\nhref="$mhref/">permalink</a> / };
-        $rv .= qq{<a\nhref="$mhref/raw">raw</a>)\n};
+        $rv .= qq{ (<a\nhref="$mhref">permalink</a> / };
+        $rv .= qq{<a\nhref="${mhref}raw">raw</a>)\n};
         $rv .= '  '.join('; +', @tocc) . "\n" if @tocc;
 
         my $mapping = $ctx->{mapping};