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 */
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 {
</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";
+}
+