X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/1925e80c4086f51c024986a55f004c1403f55ab7..5e4c37b26db8009a1104b7784fe4520d228aa7ff:/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 {