Mercurial > emacs
comparison lisp/image.el @ 28958:56c76b64f321
(image-type-available-p): Don't reference image-types
if it isn't bound.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Wed, 17 May 2000 15:57:18 +0000 |
parents | b4ea18c92e38 |
children | 7bde123bed95 |
comparison
equal
deleted
inserted
replaced
28957:71d552e41a3d | 28958:56c76b64f321 |
---|---|
70 | 70 |
71 ;;;###autoload | 71 ;;;###autoload |
72 (defun image-type-available-p (type) | 72 (defun image-type-available-p (type) |
73 "Value is non-nil if image type TYPE is available. | 73 "Value is non-nil if image type TYPE is available. |
74 Image types are symbols like `xbm' or `jpeg'." | 74 Image types are symbols like `xbm' or `jpeg'." |
75 (not (null (memq type image-types)))) | 75 (and (boundp 'image-types) (not (null (memq type image-types))))) |
76 | 76 |
77 | 77 |
78 ;;;###autoload | 78 ;;;###autoload |
79 (defun create-image (file-or-data &optional type data-p &rest props) | 79 (defun create-image (file-or-data &optional type data-p &rest props) |
80 "Create an image. | 80 "Create an image. |