Index: emacs/lisp/image.el
diff -c emacs/lisp/image.el:1.45 emacs/lisp/image.el:1.46
*** emacs/lisp/image.el:1.45 Thu Mar 17 23:56:15 2005
--- emacs/lisp/image.el Fri May 27 13:17:50 2005
***************
*** 48,67 ****
with one argument, a string containing the image data. If PREDICATE returns
a non-nil value, TYPE is the image's type.")
- ;;;###autoload
- (defvar image-library-alist nil
- "Alist of image types vs external libraries needed to display them.
-
- Each element is a list (IMAGE-TYPE LIBRARY...), where the car is a symbol
- representing a supported image type, and the rest are strings giving
- alternate filenames for the corresponding external libraries.
-
- Emacs tries to load the libraries in the order they appear on the
- list; if none is loaded, the running session of Emacs won't
- support the image type. Types 'pbm and 'xbm don't need to be
- listed; they're always supported.")
- ;;;###autoload (put 'image-library-alist 'risky-local-variable t)
-
(defun image-jpeg-p (data)
"Value is non-nil if DATA, a string, consists of JFIF image data.
We accept the tag Exif because that is the same format."
--- 48,53 ----
***************
*** 122,128 ****
;;;###autoload
(defun image-type-available-p (type)
! "Value is non-nil if image type TYPE is available.
Image types are symbols like `xbm' or `jpeg'."
(and (fboundp 'init-image-library)
(init-image-library type image-library-alist)))
--- 108,114 ----
;;;###autoload
(defun image-type-available-p (type)
! "Return non-nil if image type TYPE is available.
Image types are symbols like `xbm' or `jpeg'."
(and (fboundp 'init-image-library)
(init-image-library type image-library-alist)))
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
