font: include math/logic by default

[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,
        );
-       $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";
 }
@@ -151,11 +151,12 @@ for my $r (0 .. 5) {
 }
 print "\n";
 
+       print '<table>';
 for my $row (0, 12) {
-       print '<table><tr>';
+       print '<tr>';
        print colcell(232+$_, ($_*10 + 8) x 3) for $row .. $row+11;
-       print "</table>\n";
 }
+       print "</table>\n";
 print "\n";
 
 :></div>