aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorChong Yidong2008-09-30 23:11:17 +0000
committerChong Yidong2008-09-30 23:11:17 +0000
commit7335e376376cc04d61ee7646de5163dd7efb6a4e (patch)
tree69d6cbc672f4b11336c9295c5595c905721780b4
parent059b98fa7f67559349df65612953eed345421dea (diff)
downloademacs-7335e376376cc04d61ee7646de5163dd7efb6a4e.tar.gz
emacs-7335e376376cc04d61ee7646de5163dd7efb6a4e.zip
(mml-menu): Don't assume mml2015 is bound.
-rw-r--r--lisp/gnus/mml.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/gnus/mml.el b/lisp/gnus/mml.el
index e3ab803dd5e..f8968fbcb7c 100644
--- a/lisp/gnus/mml.el
+++ b/lisp/gnus/mml.el
@@ -1102,13 +1102,13 @@ If HANDLES is non-nil, use it instead reparsing the buffer."
1102 ["PGG manual" (lambda () (interactive) (message-info mml2015-use)) 1102 ["PGG manual" (lambda () (interactive) (message-info mml2015-use))
1103 ;; XEmacs barfs on :visible. 1103 ;; XEmacs barfs on :visible.
1104 ,@(if (featurep 'xemacs) nil 1104 ,@(if (featurep 'xemacs) nil
1105 '(:visible (equal mml2015-use 'pgg))) 1105 '(:visible (and (boundp 'mml2015-use) (equal mml2015-use 'pgg))))
1106 ,@(if (featurep 'xemacs) '(t) 1106 ,@(if (featurep 'xemacs) '(t)
1107 '(:help "Display the PGG manual"))] 1107 '(:help "Display the PGG manual"))]
1108 ["EasyPG manual" (lambda () (interactive) (message-info mml2015-use)) 1108 ["EasyPG manual" (lambda () (interactive) (require 'mml2015) (message-info mml2015-use))
1109 ;; XEmacs barfs on :visible. 1109 ;; XEmacs barfs on :visible.
1110 ,@(if (featurep 'xemacs) nil 1110 ,@(if (featurep 'xemacs) nil
1111 '(:visible (equal mml2015-use 'epg))) 1111 '(:visible (and (boundp 'mml2015-use) (equal mml2015-use 'epg))))
1112 ,@(if (featurep 'xemacs) '(t) 1112 ,@(if (featurep 'xemacs) '(t)
1113 '(:help "Display the EasyPG manual"))])) 1113 '(:help "Display the EasyPG manual"))]))
1114 1114