charset: describe and link unicode subpage

Index only shows a small subset of BMP, while even SMP has been available
since commit v1.6-183-gfc33639e32 (2015-06-09) [charset: unicode block
allocations for plane 1] and frequently updated.

diff --git a/charset.plp b/charset.plp
index 4272b6a4110b2ea309fb0fcecf5df65975f009b7..e9f097d2b1f79c45ed2c9bfb0196bd52fadf181e 100644 (file)
--- a/charset.plp
+++ b/charset.plp
@@ -28,8 +28,15 @@ use List::Util qw( first pairmap pairfirst pairs );
 
 <p>
 <:
+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,
        ],
 );
+
+}
 :>.
 </p>
 

diff --git a/index.plp b/index.plp
index e0b761f43188eeb8fe4bb164d79db7fc642ba9e0..81895192ba172dcd937df77c9980da8794cf214c 100644 (file)
--- a/index.plp
+++ b/index.plp
@@ -57,6 +57,7 @@ if (open my $log, '-|', git => 'log', -1, @format) {{
 <h2>Unicode characters</h2>
 <ul>
 <li><a href="/charset">charsets</a>
+<li><a href="/charset/unicode">unicode allocation</a>
 <li><a href="/unicode">common glyphs</a>
 <li><a href="/digraphs">digraphs</a>
 <li><a href="/writing">alphabet comparison</a>