X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/a6f73126160100b236ab93b76bf1af5f080c94f0..4f3782455010e83df98953a4fa4f146577b9a888:/termcol.plp diff --git a/termcol.plp b/termcol.plp index b79f841..850ff83 100644 --- a/termcol.plp +++ b/termcol.plp @@ -24,7 +24,7 @@ my %termgroup = ( default => [qw( ansi xkcd ansi88 )], more => [qw( ansi mirc legacy ansi256 )], msx => [qw( msx1 msx2 arnejmp )], - ansi => [qw( cga xterm tango app html )], + ansi => [qw( cga xterm tango app html cgarne )], legacy => [qw( c64 msx2 mac2 risc arnegame cpc )], ); @{$_} = map { $termgroup{$_} ? @{ $termgroup{$_} } : $_ } @{$_} @@ -127,6 +127,16 @@ for my $term (@termlist) { print "\n\n"; } + if (my $table = $info->{table}) { + print ''."\n"; + printf "\n", $caption; + for my $row (@$table) { + print ''; + print colcell(@$_) for @$row; + } + print "
%s
\n\n"; + } + if (my $palette = $info->{list}) { my $order = $get{order} && $get{order}.'order'; my $colours = colorder($palette,