X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/dc6b482b5e7e1d3d35b5193fc820c5e1afc29a6e..20944668da222b8510754fb4819b2b21e768840c:/index.plp

diff --git a/index.plp b/index.plp
index e0b761f..e3cd122 100644
--- a/index.plp
+++ b/index.plp
@@ -2,7 +2,7 @@
 
 Html({
 	title => 'cheat sheets',
-	version => '1.10',
+	version => '1.11',
 	description => [
 		"Cheat sheets summarising various software programs and standards.",
 	],
@@ -15,6 +15,7 @@ Html({
 		' title="RSS feed of repository updates"',
 		' href="http://git.shiar.nl/sheet.git/rss">',
 	],
+	data => ['UPDATE'],
 });
 
 :>
@@ -28,12 +29,13 @@ 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+)(?=: )}{showlink($1, -e "$1.plp" && "/$1")}e;
 	say "<p><strong>Last update</strong>: $date $subject</p>";
 }}
 
@@ -57,6 +59,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>
@@ -74,9 +77,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>