Improve 'illegal colour' error message in icon.pl.

It actually went off this morning, after an upgrade of ImageMagick,
and I found that it contained both unprintable characters in the
colour description and the wrong variable in the coordinate display.
This commit is contained in:
Simon Tatham
2016-04-24 07:29:25 +01:00
parent 9d15092e7f
commit 02ce237f91

View File

@ -203,7 +203,8 @@ sub readicon {
$currbits += $depth; $currbits += $depth;
if ($x < $w && defined ($pix = $data->[$y*$w+$x])) { if ($x < $w && defined ($pix = $data->[$y*$w+$x])) {
if (!defined $pal{$pix}) { if (!defined $pal{$pix}) {
die "illegal colour value $pix at pixel $i in $filename\n"; my $pixprintable = unpack "H*", $pix;
die "illegal colour value $pixprintable at pixel ($x,$y) in $filename\n";
} }
$currbyte |= $pal{$pix}; $currbyte |= $pal{$pix};
} }