From 249781907d8ed883f5932827ba2bbf8e0d9cb7a6 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Wed, 17 May 2000 15:58:11 +0000 Subject: [PATCH] (image-type-available-p): Don't reference image-types if it isn't bound. --- lisp/ChangeLog | 5 +++++ lisp/image.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 25e8dcd0dc3..2f7fd3e20b2 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2000-05-17 Eli Zaretskii + + * image.el (image-type-available-p): Don't reference image-types + if it isn't bound. + 2000-05-17 Stefan Monnier * autoarg.el (autoarg-mode): Typo in the :set argument. diff --git a/lisp/image.el b/lisp/image.el index 78ca54add95..0c1e54a702b 100644 --- a/lisp/image.el +++ b/lisp/image.el @@ -72,7 +72,7 @@ be determined." (defun image-type-available-p (type) "Value is non-nil if image type TYPE is available. Image types are symbols like `xbm' or `jpeg'." - (not (null (memq type image-types)))) + (and (boundp 'image-types) (not (null (memq type image-types))))) ;;;###autoload -- 2.39.5