git.shiar.nl
/
sheet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
keys: replace omni-present escape keys
[sheet.git]
/
termcol.plp
diff --git
a/termcol.plp
b/termcol.plp
index 90f8a7cf200e95df870bc6ef1d996ea9e6175cde..c564255dd607b5a979cbcd4cd098bcddc682045a 100644
(file)
--- a/
termcol.plp
+++ b/
termcol.plp
@@
-35,7
+35,7
@@
sub colcell {
"background:$css; color:$inverse; padding:0 1ex",
$name,
);
"background:$css; color:$inverse; padding:0 1ex",
$name,
);
- $out .= sprintf '<td style="%s">
%s
', "background:$_; color:$css", $minhex
+ $out .= sprintf '<td style="%s">
<code>%s</code>
', "background:$_; color:$css", $minhex
for @$sample;
return "$out\n";
}
for @$sample;
return "$out\n";
}
@@
-151,11
+151,12
@@
for my $r (0 .. 5) {
}
print "\n";
}
print "\n";
+ print '<table>';
for my $row (0, 12) {
for my $row (0, 12) {
- print '<t
able><t
r>';
+ print '<tr>';
print colcell(232+$_, ($_*10 + 8) x 3) for $row .. $row+11;
print colcell(232+$_, ($_*10 + 8) x 3) for $row .. $row+11;
- print "</table>\n";
}
}
+ print "</table>\n";
print "\n";
:></div>
print "\n";
:></div>