git.shiar.nl
/
sheet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
word/quiz: dynamic lang(uage) option
[sheet.git]
/
index.plp
diff --git
a/index.plp
b/index.plp
index 468e92731e84ec4d421f620895dd43416b61f340..c20b44b09be85cfd20b5a781e7d5c56cff1799d2 100644
(file)
--- a/
index.plp
+++ b/
index.plp
@@
-2,7
+2,7
@@
Html({
title => 'cheat sheets',
Html({
title => 'cheat sheets',
- version => '1.1
1
',
+ version => '1.1
3
',
description => [
"Cheat sheets summarising various software programs and standards.",
],
description => [
"Cheat sheets summarising various software programs and standards.",
],
@@
-18,6
+18,7
@@
Html({
data => ['UPDATE'],
});
data => ['UPDATE'],
});
+exit if $ENV{REQUEST_METHOD} eq 'HEAD';
:>
<h1>Shiar's cheat sheets</h1>
:>
<h1>Shiar's cheat sheets</h1>
@@
-35,6
+36,7
@@
if (open my $log, '<', 'UPDATE') {{
EscapeHTML $line;
my ($date, $subject) = split /[\t\n]/, $line;
$date =~ s/ \K/<small>/ and $date .= '</small>';
EscapeHTML $line;
my ($date, $subject) = split /[\t\n]/, $line;
$date =~ s/ \K/<small>/ and $date .= '</small>';
+ $subject =~ s{\A(\w+)(?=: )}{showlink($1, -e "$1.plp" && "/$1")}e;
say "<p><strong>Last update</strong>: $date $subject</p>";
}}
say "<p><strong>Last update</strong>: $date $subject</p>";
}}
@@
-76,8
+78,7
@@
if (open my $log, '<', 'UPDATE') {{
<li><a href="/perl">perl versions</a>
<li><a href="/apl">apl symbols</a>
<li><a href="/termcol">terminal colours</a>
<li><a href="/perl">perl versions</a>
<li><a href="/apl">apl symbols</a>
<li><a href="/termcol">terminal colours</a>
-<li><a href="/sc/2">starcraft 2 units</a>
- (<a href="/sc" title="StarCraft: Brood War">bw</a>)
+<li><a href="/sc/lotv">starcraft units</a>
<li><a href="/emoji">emoticons</a>
<li><a href="/dieren">dieren (Dutch animals)</a>
</ul>
<li><a href="/emoji">emoticons</a>
<li><a href="/dieren">dieren (Dutch animals)</a>
</ul>