git.shiar.nl
/
sheet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
56eec01
)
apl: click to expand all descriptions
author
Mischa POSLAWSKY
<perl@shiar.org>
Wed, 4 Mar 2015 20:22:39 +0000
(21:22 +0100)
committer
Mischa POSLAWSKY
<perl@shiar.org>
Tue, 9 Jun 2015 03:43:43 +0000
(
05:43
+0200)
apl.plp
patch
|
blob
|
history
diff --git
a/apl.plp
b/apl.plp
index 804d80ea9c5c1813f9060cc6acc035aba858fba0..52ea685a7b56c7427f7c11f78dd483dca8ee0c4e 100644
(file)
--- a/
apl.plp
+++ b/
apl.plp
@@
-9,6
+9,20
@@
Html({
'],
stylesheet => [qw'light circus dark red'],
data => [qw'apl.inc.pl'],
'],
stylesheet => [qw'light circus dark red'],
data => [qw'apl.inc.pl'],
+ raw => <<'EOT',
+<style>
+ .target tbody td:nth-child(4) ~ td,
+ :target tbody td:nth-child(4) ~ td {
+ text-align: left;
+ }
+ .target tbody td[title]::after,
+ :target tbody td[title]::after {
+ content: ': ' attr(title);
+ font-size: 75%;
+ opacity: .7;
+ }
+</style>
+EOT
});
use Shiar_Sheet::FormatChar;
});
use Shiar_Sheet::FormatChar;
@@
-21,7
+35,7
@@
my @ops = do 'apl.inc.pl';
<h1>APL Symbols</h1>
<div class="section">
<h1>APL Symbols</h1>
<div class="section">
-<table class="mapped">
+<table class="mapped"
onclick="this.classList.toggle('target')"
>
<col><colgroup span=3><colgroup span=2>
<thead><tr>
<td rowspan=2>op
<col><colgroup span=3><colgroup span=2>
<thead><tr>
<td rowspan=2>op
@@
-60,7
+74,7
@@
for my $op (@ops) {
map { !!$_->[1] && qq( title="$_->[1]"), $_->[0] }
[map { EscapeHTML($_) } split /\n/, $_, 2]
) for $monad, $dyad;
map { !!$_->[1] && qq( title="$_->[1]"), $_->[0] }
[map { EscapeHTML($_) } split /\n/, $_, 2]
) for $monad, $dyad;
- print "\n";
+ print "
</td>
\n";
}
:></table>
}
:></table>