From 4c28c0f1dd2556ecb920f2cea1785527e6c44a06 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Wed, 21 Feb 2024 22:48:42 +0100
Subject: [PATCH] common: omit trailing slash from requestless canonical links

---
 common.inc.plp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/common.inc.plp b/common.inc.plp
index 8a13059..ee21f02 100644
--- a/common.inc.plp
+++ b/common.inc.plp
@@ -157,7 +157,8 @@ sub Html {
 
 	my ($file) = $ENV{SCRIPT_FILENAME} =~ m{ ([^/]+) \.plp$ }x;
 
-	if (my $url = $meta->{canonical} // "/$file/$Request") {
+	$meta->{canonical} //= "/$file" . ($Request ne '' && "/$Request");
+	if (my $url = $meta->{canonical}) {
 		$url = "https://sheet.shiar.nl$url";
 		push @{ $meta->{raw} }, qq(<link rel="canonical" href="$url" />);
 	}
-- 
2.30.0