From: Mischa POSLAWSKY <perl@shiar.org>
Date: Mon, 26 Oct 2015 16:07:50 +0000 (+0100)
Subject: termcol: show incompatible palettes on ?v option
X-Git-Tag: v1.9~108
X-Git-Url: http://git.shiar.nl/sheet.git/commitdiff_plain/dab3a79e2d478b8b02bd2efc34a0fe7d5d968c2c

termcol: show incompatible palettes on ?v option
---

diff --git a/termcol.plp b/termcol.plp
index c3bdbd2..be514c3 100644
--- a/termcol.plp
+++ b/termcol.plp
@@ -171,7 +171,9 @@ my %col = (
 	],
 );
 
-for my $term (qw/cga xterm tango app html xkcd/) {
+my @termlist = qw( cga xterm tango app html xkcd );
+push @termlist, qw( c64 msx2 mac2 risc game ) if exists $get{v};
+for my $term (@termlist) {
 	print '<table>', "\n";
 	printf "<caption>%s</caption>\n", $col{$term}[0] || $term;
 	for my $num (1 .. $#{ $col{$term} }) {