termcol: reorder arne to match ansi better

[sheet.git] / latin.plp

diff --git a/latin.plp b/latin.plp
index a166ff80b33875b81bfab08bd7000c3201a119dd..68e6a83b03462d2b9ff93faf4e93dfd57d8a8860 100644 (file)
--- a/latin.plp
+++ b/latin.plp
@@ -2,7 +2,7 @@
 
 Html({
        title => 'latin alphabet cheat sheet',
-       version => '1.1',
+       version => '1.2',
        description => [
        ],
        keywords => [qw'
@@ -37,7 +37,7 @@ if ($! or $@) {
 }
 else {
        print '<table class="glyphs">';
-       print ref $_ ne 'ARRAY' ? "<tr><th>$_" : map {"<td>$_"} @$_ for @table;
+       print ref $_ ne 'ARRAY' ? "<tr><th>$_" : map {/^<td/ ? $_ : "<td>$_"} @$_ for @table;
        print "</table>\n\n";
 }