X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/263ed1a94b04cfa0cdb2e02fec49d73000356b4a..22df5af9280e24267be789edcff52be9c43fd8ca:/index.plp?ds=sidebyside
diff --git a/index.plp b/index.plp
index c3b02ec..f05c02a 100644
--- 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 => [
+ '',
'',
],
+ data => ['UPDATE'],
});
-
:>
Shiar's cheat sheets
@@ -27,12 +29,15 @@ Originally created by Mischa Poslawsky,
but you're free to use, print, alter, and redistribute under the AGPL license.
<:
-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// and $date .= '';
+ $subject =~ s{\A (\w+) (?= (?:/\w+)* :\h )}{
+ showlink($1, -e "$1.plp" && "/$1");
+ }ex;
say "Last update: $date $subject
";
}}
@@ -48,7 +53,8 @@ if (open my $log, '-|', git => 'log', -1, @format) {{
vimperator
mutt
nethack
-mplayer
+mplayer/mpv
+altgr/option
@@ -56,10 +62,12 @@ if (open my $log, '-|', git => 'log', -1, @format) {{
Unicode characters
@@ -72,9 +80,9 @@ if (open my $log, '-|', git => 'log', -1, @format) {{
perl versions
apl symbols
terminal colours
-starcraft 2 units
- (bw)
+starcraft units
emoticons
+dieren (Dutch animals)