view: fix broken threadlink

This regression was accidentally introduced in
commit f24d362fb0959cdfab37a6da0a66a985764a2752
("view: display thread outline in single-message view")

diff --git a/lib/PublicInbox/View.pm b/lib/PublicInbox/View.pm
index 946df37f3835031b24d19c77cd35662f5203b309..660447ddb527624e7ccd666402849274ad8f56e4 100644 (file)
--- a/lib/PublicInbox/View.pm
+++ b/lib/PublicInbox/View.pm
@@ -473,6 +473,7 @@ sub html_footer {
        my $srch = $ctx->{srch} if $ctx;
        my $idx = $standalone ? " <a\nhref=\"../../\">index</a>" : '';
        if ($idx && $srch) {
+               $mid = mid_compress(mid_clean($mid));
                my $t_anchor = defined $irt ? T_ANCHOR : '';
                $irt = $mime->header('In-Reply-To');
                $idx = " <a\nhref=\"../../t/$mid/$t_anchor\">".