X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/b733f673734a104e3bc0ed2585ff4abbc4db2e78..a4aefb765b44c548e0b8b319f78648b43e98791d:/index.plp diff --git a/index.plp b/index.plp index 42ff251..3e997e3 100644 --- a/index.plp +++ b/index.plp @@ -2,14 +2,13 @@ Html({ title => 'cheat sheets', - version => 'v1.6', + version => '1.9', 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'], }); :> @@ -25,13 +24,15 @@ 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) {{ - my $line = readline $log or next; + my $line = readline $log; + $line or next; # explicitly ignore empty input my ($date, $subject) = split /[\t\n]/, $line; $date =~ s/ \K// and $date .= ''; - print "

Last update: $date $subject

\n"; + say "

Last update: $date $subject

"; }} :> +