X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/0f1f7a00062360f4b373f027a2a3fa8d43cacd06..eff606238ed93a22da0b9e8e587db629ef334e7b:/termcol.plp diff --git a/termcol.plp b/termcol.plp index c58670c..acfe2be 100644 --- a/termcol.plp +++ b/termcol.plp @@ -91,6 +91,7 @@ for my $term (@termlist) { for my $num (0 .. $#{$colours}) { my ($rgb, $name) = split /:/, $colours->[$num], 3; $name ||= $num; + $name = [ $name, [] ] if $term =~ /^msx/ and !$num; $name = [ $name, ['#333'] ] if $term eq 'xkcd'; print '', colcell($name, $rgb); }