gnus-ems.el (gnus-image-type-available-p): Test display-images-p' before
image-type-available-p'
This commit is contained in:
parent
d0341459c1
commit
ebada6e0ed
2 changed files with 8 additions and 2 deletions
|
@ -1,3 +1,9 @@
|
|||
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>
|
||||
|
||||
* gnus-art.el (article-date-ut, article-update-date-lapsed): Don't
|
||||
|
|
|
@ -165,10 +165,10 @@
|
|||
|
||||
(defun gnus-image-type-available-p (type)
|
||||
(and (fboundp 'image-type-available-p)
|
||||
(image-type-available-p type)
|
||||
(if (fboundp 'display-images-p)
|
||||
(display-images-p)
|
||||
t)))
|
||||
t)
|
||||
(image-type-available-p type)))
|
||||
|
||||
(defun gnus-create-image (file &optional type data-p &rest props)
|
||||
(let ((face (plist-get props :face)))
|
||||
|
|
Loading…
Add table
Reference in a new issue