X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/b44d61378ef1395d5003610a7904a6c2351243a5..2d5b9e1f36bd86e3e7b862f40a9ed3e78325f45a:/charset.plp diff --git a/charset.plp b/charset.plp index 4272b6a..e9f097d 100644 --- a/charset.plp +++ b/charset.plp @@ -28,8 +28,15 @@ use List::Util qw( first pairmap pairfirst pairs );

<: +if ($tablist[0] eq 'unicode') { + say "Detailed allocation of Unicode blocks."; + print "See ", showlink("charsets", '/charset'), " to compare specific encodings"; +} +else { + if ($tablist[0] eq 'default') { - say "Overview of Unicode allocation and common latin code pages."; + say "Overview of Unicode ", showlink("allocation", '/charset/unicode'); + say "and common latin code pages."; say "Compare alternate charsets:"; } else { @@ -60,6 +67,8 @@ print join " •\n", ( hebrew => 0, ], ); + +} :>.