X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/dc6b482b5e7e1d3d35b5193fc820c5e1afc29a6e..HEAD:/index.plp diff --git a/index.plp b/index.plp index e0b761f..f05c02a 100644 --- a/index.plp +++ b/index.plp @@ -2,7 +2,8 @@ Html({ title => 'cheat sheets', - version => '1.10', + canonical => '/', + version => '1.18', description => [ "Cheat sheets summarising various software programs and standards.", ], @@ -15,8 +16,8 @@ Html({ ' title="RSS feed of repository updates"', ' href="http://git.shiar.nl/sheet.git/rss">', ], + data => ['UPDATE'], }); - :>

Shiar's cheat sheets

@@ -28,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

"; }} @@ -49,7 +53,8 @@ if (open my $log, '-|', git => 'log', -1, @format) {{
  • vimperator
  • mutt
  • nethack -
  • mplayer +
  • mplayer/mpv +
  • altgr/option @@ -57,6 +62,7 @@ if (open my $log, '-|', git => 'log', -1, @format) {{

    Unicode characters