termcol: optional display of 256-colour space

diff --git a/termcol.plp b/termcol.plp
index 395c2086a663fd2e1926ff9449d6ea85a315fbb7..10d68ac50f80006ecbf507a50e36ded908025665 100644 (file)
--- a/termcol.plp
+++ b/termcol.plp
@@ -106,8 +106,9 @@ print "\n";
 print '<table><tr>';
 print colcell(80, ($_) x 3) for 46, 92, 115, 139, 162, 185, 208, 231;
 print "</table>\n\n";
 print '<table><tr>';
 print colcell(80, ($_) x 3) for 46, 92, 115, 139, 162, 185, 208, 231;
 print "</table>\n\n";

-:></div>

 
 

+:></div>
+<: if ($ENV{PATH_INFO} =~ /256/) { :>

 <hr>
 
 <div class="section">
 <hr>
 
 <div class="section">


@@ -132,8 +133,9 @@ for my $row (0, 12) {
        print "</table>\n";
 }
 print "\n";
        print "</table>\n";
 }
 print "\n";

-:></div>

 
 

+:></div>
+<: } :>

 <hr>
 
 <p class="footer">
 <hr>
 
 <p class="footer">