From c893d53eced92dc620f64b7fe9c264fea6f07f14 Mon Sep 17 00:00:00 2001 From: Boutade Date: Tue, 17 Mar 2020 08:18:19 -0500 Subject: read-image to read-png --- imbricate.ros | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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))) -- cgit v1.2.3