index: release v1.18 with only altgr index linked

[sheet.git] / index.plp

diff --git a/index.plp b/index.plp
index c3b02ec36af7d7f031bd99811357d075bdb4cf66..f05c02afb49d372b0e235b5b83802697f0a941cc 100644 (file)
--- a/index.plp
+++ b/index.plp
@@ -2,7 +2,8 @@
 
 Html({
        title => 'cheat sheets',
-       version => '1.9',
+       canonical => '/',
+       version => '1.18',
        description => [
                "Cheat sheets summarising various software programs and standards.",
        ],
@@ -10,12 +11,13 @@ Html({
                sheet cheat reference software overview summary help keyboard map unicode
        '],
        raw => [
+               '<link rel="sitemap" type="application/xml" href="/sitemap.xml">',
                '<link rel="alternate" type="application/rss+xml"',
                ' title="RSS feed of repository updates"',
                ' href="http://git.shiar.nl/sheet.git/rss">',
        ],
+       data => ['UPDATE'],
 });
-
 :>
 <h1>Shiar's cheat sheets</h1>
 
@@ -27,12 +29,15 @@ Originally created by Mischa <span class="family-name">Poslawsky</span>,
 but you're free to use, print, alter, and redistribute under the AGPL license.
 </p>
 <:
-my @format = ('--date=short', "--pretty=%ad (%ar)\t%s");
-if (open my $log, '-|', git => 'log', -1, @format) {{
+if (open my $log, '<', 'UPDATE') {{
        my $line = readline $log;
        $line or next;  # explicitly ignore empty input
+       EscapeHTML $line;
        my ($date, $subject) = split /[\t\n]/, $line;
        $date =~ s/ \K/<small>/ and $date .= '</small>';
+       $subject =~ s{\A (\w+) (?= (?:/\w+)* :\h )}{
+               showlink($1, -e "$1.plp" && "/$1");
+       }ex;
        say "<p><strong>Last update</strong>: $date $subject</p>";
 }}
 
@@ -48,7 +53,8 @@ if (open my $log, '-|', git => 'log', -1, @format) {{
 <li><a href="/vimperator">vimperator</a>
 <li><a href="/mutt">mutt</a>
 <li><a href="/nethack">nethack</a>
-<li><a href="/mplayer">mplayer</a>
+<li><a href="/mplayer/mpv">mplayer/mpv</a>
+<li><a href="/keyboard/altgr">altgr/option</a>
 </ul>
 </div>
 
@@ -56,10 +62,12 @@ 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>
 <li><a href="/latin">latin variants</a>
+<li><a href="/digits">numerals</a>
 <li><a href="/font">font coverage</a>
 </ul>
 </div>
@@ -72,9 +80,9 @@ if (open my $log, '-|', git => 'log', -1, @format) {{
 <li><a href="/perl">perl versions</a>
 <li><a href="/apl">apl symbols</a>
 <li><a href="/termcol">terminal colours</a>
-<li><a href="/sc/2">starcraft 2 units</a>
-       (<a href="/sc" title="StarCraft: Brood War">bw</a>)
+<li><a href="/sc/lotv">starcraft units</a>
 <li><a href="/emoji">emoticons</a>
+<li><a href="/dieren">dieren (Dutch animals)</a>
 </ul>
 </div>
 </nav>