X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/d22e7febda8720bc38069f7061adb43b98143c48..cf5aaee63c5aa7eeae7e2e136e58e156841616a9:/index.plp diff --git a/index.plp b/index.plp index 57cca20..db6284c 100644 --- a/index.plp +++ b/index.plp @@ -32,6 +32,7 @@ my @format = ('--date=short', "--pretty=%ad (%ar)\t%s"); if (open my $log, '-|', git => 'log', -1, @format) {{ 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 .= ''; say "

Last update: $date $subject

";