view: avoid redundant trailing slash for In-Reply-To

[public-inbox.git] / lib / PublicInbox / View.pm

diff --git a/lib/PublicInbox/View.pm b/lib/PublicInbox/View.pm
index 140cfeedbec1ca8bee1e8ae330406183dc36d93f..fd882aa031f3be3f4751c77bad077a75cfab788a 100644 (file)
--- a/lib/PublicInbox/View.pm
+++ b/lib/PublicInbox/View.pm
@@ -147,7 +147,7 @@ sub index_entry {
                my $mirt = PublicInbox::Hval->new_msgid($irt);
                my $href = $upfx . $mirt->as_href . '/';
                my $html = $mirt->as_html;
-               $rv .= qq(In-Reply-To: &lt;<a\nhref="$href/">$html</a>&gt;\n)
+               $rv .= qq(In-Reply-To: &lt;<a\nhref="$href">$html</a>&gt;\n)
        }
        $rv .= "\n";