X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/23a77ad01b96149db5e07121c09481dd1c5d9b4a..6ed62e14be81b861a7815703bf4c2786aefac0fe:/index.plp
diff --git a/index.plp b/index.plp
index 30e5864..22f13df 100644
--- a/index.plp
+++ b/index.plp
@@ -1,21 +1,18 @@
<(common.inc.plp)><:
- our $VERSION = 'v1.0';
-:>
-
-
-
-
-cheat sheets
-
-
-<:= stylesheet(qw'light dark red') :>
-
-
-
-
+Html({
+ title => 'cheat sheets',
+ version => 'v1.4',
+ description => [
+ "Cheat sheets summarising various software programs and standards.",
+ ],
+ keywords => [qw'
+ sheet cheat reference software overview summary help keyboard map unicode
+ '],
+ stylesheet => [qw'light dark red'],
+});
+:>
Shiar's cheat sheets
@@ -30,6 +27,7 @@ but you're free to use, print, alter, and redistribute under the AGPL license.
Keyboard maps
- readline
+
- less
- vi/vim
- vimperator
- mutt
@@ -41,18 +39,33 @@ but you're free to use, print, alter, and redistribute under the AGPL license.
-
+
+
+<:
+if (open my $log, '-|', 'git log -20 --since=2\ week\ ago --pretty=%ai%x00%s%x00%h') {
+ print "
Recent updates
\n\n";
+ print "\n";
+ while (readline $log) {
+ chomp;
+ my ($date, $subject, $commit) = split /\0/, $_;
+ $date =~ s{( .+)}{$1};
+ printf '- %s
- %s
'."\n", $date, $subject;
+ }
+ print "
\n\n";
+}