X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/6200f20ad733db0f13be5dc766249c3c1f500937..a58594c9f79e5562f99f7c69c2c0e717d5b66491:/writer.plp diff --git a/writer.plp b/writer.plp index fe538dd..a5aa431 100644 --- a/writer.plp +++ b/writer.plp @@ -202,7 +202,10 @@ elsif (defined $post{form}) {{ if ($reimage) { eval { $image->convert($wordcol{thumb}->{-src}->($row), $row->{thumb}); - } or Alert([ "Thumbnail image not generated", $@->[0] ], $@->[1]); + } or do { + my ($warn, @details) = ref $@ ? @{$@} : $@; + Alert([ "Thumbnail image not generated", $warn ], @details); + }; } }} else {