diff options
-rwxr-xr-x | imbricate.ros | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/imbricate.ros b/imbricate.ros index 2693a3b..4683fe2 100755 --- a/imbricate.ros +++ b/imbricate.ros @@ -32,7 +32,7 @@ exec ros -Q -- $0 "$@" (defvar *bad-images* '()) (defun safe-open-image (path) - (handler-case (imago:read-image (format nil "~a" path)) + (handler-case (imago:read-png (format nil "~a" path)) (error (c) (push path *bad-images*) nil))) |