unicode: some mathematical symbols (wip)

[sheet.git] / termcol.plp

diff --git a/termcol.plp b/termcol.plp
index 5493c8ae2eef2c0189e4168b05ddce5d19e8a842..c564255dd607b5a979cbcd4cd098bcddc682045a 100644 (file)
--- a/termcol.plp
+++ b/termcol.plp
@@ -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>