X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/dc6b482b5e7e1d3d35b5193fc820c5e1afc29a6e..dc1ab5f00eed170e75fe40687b381369a35760b8:/termcol.plp diff --git a/termcol.plp b/termcol.plp index c510cd2..86ccd45 100644 --- a/termcol.plp +++ b/termcol.plp @@ -16,7 +16,7 @@ Html({ }); my @draw = map { [$_, s/\W+\z//] } grep { $_ } split m(/), - $get{img} // exists $get{img} && 'indi.png'; + $get{img} // exists $get{img} && 'compile.png'; my @termlist; push @termlist, split /\W+/, $Request || 'default'; @@ -45,7 +45,7 @@ use List::Util qw( min max ); use POSIX qw( ceil ); my $palettes = do 'termcol.inc.pl'; -die "Cannot open palette data: $_\n" for $@ || $! || (); +Abort("Cannot open palette data", 501, $_) for $@ || $! || (); sub colcell { my $name = shift // return "\n";