]> git.eshelyaron.com Git - emacs.git/commitdiff
lisp/gnus/mailcap.el (mailcap-mailcap-entry-passes-test): Doc fix
authorKatsumi Yamaoka <yamaoka@jpl.org>
Wed, 21 Oct 2015 05:36:51 +0000 (05:36 +0000)
committerKatsumi Yamaoka <yamaoka@jpl.org>
Wed, 21 Oct 2015 05:36:51 +0000 (05:36 +0000)
lisp/gnus/mailcap.el

index a3348c69869fea54e664dfb86fd5ebbd27abae75..d8881104af8acb07c5739a91965361eca80b52bb 100644 (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) " ")))