Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-17 18:37:33 +00:00
Code Issues Projects Releases Packages Wiki Activity

lisp/gnus/mailcap.el (mailcap-mailcap-entry-passes-test): Doc fix

Browse source
This commit is contained in:
Katsumi Yamaoka 2015-10-21 05:36:51 +00:00
parent 63cfb75f3a
commit 8b40f8d953
1 changed files with 5 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/gnus/mailcap.el
View file

@ -556,8 +556,11 @@ MAILCAPS if set; otherwise (on Unix) use the path from RFC 1524, plus
results)))
(defun mailcap-mailcap-entry-passes-test (info)
"Return non-nil if mailcap entry INFO passes its test clause.
Also return non-nil if no test clause is present."
"Replace the test clause of INFO itself with a boolean for some cases.
This function supports only `test -n $DISPLAY' and `test -z $DISPLAY',
replaces them with t or nil. As for others or if INFO has a interactive
spec (needsterm, needsterminal, or needsx11) but DISPLAY is not set,
the test clause will be unchanged."
(let ((test (assq 'test info)) ; The test clause
status)
(setq status (and test (split-string (cdr test) " ")))