digraphs: page metadata in subpage includes

[sheet.git] / tools / mkdigraphlist

diff --git a/tools/mkdigraphlist b/tools/mkdigraphlist
index 075d564b07d2079abe09a9e84087f2ee1f4cf235..2f6acc8d111ca0588510dd8c5256e6d6ae70d8f5 100755 (executable)
--- a/tools/mkdigraphlist
+++ b/tools/mkdigraphlist
@@ -45,7 +45,18 @@ $table{$_} = [
 ] for sort keys %{$di};
 
 print JSON->new->ascii->canonical->encode({
+       title => 'RFC-1345',
        key  => \%table,
+       intro => join("\n",
+               'Character mnemonics following compose key ⎄:',
+               'i^k in <a href="/vi">Vim</a>,',
+               '^u^\ in <a href="/readline">Emacs</a>,',
+               '^a^v in <a href="/screen">Screen</a>.',
+               'Similar but different from <a href="/digraphs/xorg">X.Org</a>.',
+               'Also see <a href="/unicode">common Unicode</a>.</p>',
+               '<p class="aside">Unofficial <span class="u-l2">proposals</span>',
+               'are available as <a href="/digraphs.vim">ex commands</a>.',
+       ),
        flag => {
                l4 => 'full support',
                l3 => 'vim extension',