Commit ebada6e0 authored by Ted Zlatanov's avatar Ted Zlatanov Committed by Katsumi Yamaoka
Browse files

gnus-ems.el (gnus-image-type-available-p): Test `display-images-p' before `image-type-available-p'

parent d0341459
2013-06-06 Teodor Zlatanov <tzz@lifelogs.com>
* gnus-ems.el (gnus-image-type-available-p): Test `display-images-p'
before `image-type-available-p' to avoid loading the image libraries
needlessly.
2013-06-04 Katsumi Yamaoka <yamaoka@jpl.org> 2013-06-04 Katsumi Yamaoka <yamaoka@jpl.org>
   
* gnus-art.el (article-date-ut, article-update-date-lapsed): Don't * gnus-art.el (article-date-ut, article-update-date-lapsed): Don't
......
...@@ -165,10 +165,10 @@ ...@@ -165,10 +165,10 @@
(defun gnus-image-type-available-p (type) (defun gnus-image-type-available-p (type)
(and (fboundp 'image-type-available-p) (and (fboundp 'image-type-available-p)
(image-type-available-p type)
(if (fboundp 'display-images-p) (if (fboundp 'display-images-p)
(display-images-p) (display-images-p)
t))) t)
(image-type-available-p type)))
(defun gnus-create-image (file &optional type data-p &rest props) (defun gnus-create-image (file &optional type data-p &rest props)
(let ((face (plist-get props :face))) (let ((face (plist-get props :face)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment