X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/ce93e984084764f24f25324e8033c405b7e768f5..d9ec472869a2c33c469cad90a21b221f14f29af3:/index.plp diff --git a/index.plp b/index.plp index 36d87eb..e3cd122 100644 --- a/index.plp +++ b/index.plp @@ -2,13 +2,20 @@ Html({ title => 'cheat sheets', - version => '1.9', + version => '1.11', description => [ "Cheat sheets summarising various software programs and standards.", ], keywords => [qw' sheet cheat reference software overview summary help keyboard map unicode '], + raw => [ + '', + '', + ], + data => ['UPDATE'], }); :> @@ -22,12 +29,13 @@ 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+)(?=: )}{showlink($1, -e "$1.plp" && "/$1")}e; say "

Last update: $date $subject

"; }} @@ -51,10 +59,12 @@ if (open my $log, '-|', git => 'log', -1, @format) {{

Unicode characters

@@ -67,9 +77,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)