From e23bdedbbacbada904520b4d2a90d13f3dd5179d Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Mon, 13 Dec 2010 21:35:56 +0100
Subject: [PATCH] index: list latest git commits

---
 base.css  | 13 +++++++++++++
 index.plp | 13 +++++++++++++
 2 files changed, 26 insertions(+)

diff --git a/base.css b/base.css
index c4c36d4..54c1e1a 100644
--- a/base.css
+++ b/base.css
@@ -79,6 +79,17 @@ ul {
 	text-align: left;
 }
 
+dl > dt {
+	float: left;
+	width: 50%;
+	text-align: right;
+}
+dl > dd {
+	text-align: left;
+	padding-left: 1em;
+	overflow: hidden;
+}
+
 /* "keyboard" (list of keys) */
 
 ul#rows {margin-top: -5ex} /* top (esc) row fits besides header */
@@ -527,9 +538,11 @@ dl.legend dt {
 	margin: 0 0 1px; /* distinct keys */
 	height: auto; /* not key-height */
 	padding: 2px 0;
+	width: auto; /* not center-aligned */
 }
 dl.legend dd {
 	margin: 3px 0.4em 0; /* align text (add dt border+padding height) */
+	padding: 0;
 }
 
 dl.legend-options dt {
diff --git a/index.plp b/index.plp
index e8b3a0f..22f13df 100644
--- a/index.plp
+++ b/index.plp
@@ -56,3 +56,16 @@ but you're free to use, print, alter, and redistribute under the AGPL license.
 </ul>
 </div>
 
+<:
+if (open my $log, '-|', 'git log -20 --since=2\ week\ ago --pretty=%ai%x00%s%x00%h') {
+	print "<h1>Recent updates</h1>\n\n";
+	print "<dl>\n";
+	while (readline $log) {
+		chomp;
+		my ($date, $subject, $commit) = split /\0/, $_;
+		$date =~ s{( .+)}{<small>$1</small>};
+		printf '<dt>%s</dt><dd>%s</dd>'."\n", $date, $subject;
+	}
+	print "</dl>\n\n";
+}
+
-- 
2.30.0