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")
$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};