common: preferred external url in canonical link

[sheet.git] / keyboard.plp

diff --git a/keyboard.plp b/keyboard.plp
index 62e150a7dd726b75c4d1d9ba0f4898a837b149ef..e4ba72da23a61720a847b547989228d404f9dd0b 100644 (file)
--- a/keyboard.plp
+++ b/keyboard.plp
@@ -26,6 +26,7 @@ if ($Request =~ /^altgr/ and open my $cssinc, '<', 'keyboard/altgr.css') {
 Html({
        title => "\L$mode\E keyboard cheat sheet",
        version => $info->{version} || '0.1',
+       canonical => -e "$Request.plp" ? "/$Request" : undef, # historic shorthand
        description => $info->{description} //
                ["Keyboard cheat sheet for the default controls of $mode."],
        keywords => [@{ $info->{keywords} // [] }, qw'