X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/ea5b27f93e87b819504b4cbcdf5aa7e47cff0175..9e973bc5fa6723a0ab712c6272a8fbbd9800eff8:/word.plp

diff --git a/word.plp b/word.plp
index 493bde9..d1c0241 100644
--- a/word.plp
+++ b/word.plp
@@ -1,5 +1,14 @@
 <(common.inc.plp)><:
 
+if ($Request and $Request =~ m{\A([^/]+)}) {
+	my $page = "word/$1.plp";
+	utf8::downgrade($page); # unicode filename breaks contents encoding
+	if (-e $page) {
+		Include $page;
+		exit;
+	}
+}
+
 my $lang = $get{lang} || 'en';
 my $wordlist = "data/wordlist.$lang.inc.pl";
 my $limit = $get{v} // (exists $get{v} ? 4 : 3);