# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1222816277 0
# Node ID 9f489d6f8e690659cfea63d8891c2005d14880e6
# Parent  90863e3da520affcfdcde8f5d507b32f6a2a9b38
(mml-menu): Don't assume mml2015 is bound.

diff -r 90863e3da520 -r 9f489d6f8e69 lisp/gnus/mml.el
--- a/lisp/gnus/mml.el	Tue Sep 30 23:11:11 2008 +0000
+++ b/lisp/gnus/mml.el	Tue Sep 30 23:11:17 2008 +0000
@@ -1102,13 +1102,13 @@
     ["PGG manual" (lambda () (interactive) (message-info mml2015-use))
      ;; XEmacs barfs on :visible.
      ,@(if (featurep 'xemacs) nil
-	 '(:visible (equal mml2015-use 'pgg)))
+	 '(:visible (and (boundp 'mml2015-use) (equal mml2015-use 'pgg))))
      ,@(if (featurep 'xemacs) '(t)
 	 '(:help "Display the PGG manual"))]
-    ["EasyPG manual" (lambda () (interactive) (message-info mml2015-use))
+    ["EasyPG manual" (lambda () (interactive) (require 'mml2015) (message-info mml2015-use))
      ;; XEmacs barfs on :visible.
      ,@(if (featurep 'xemacs) nil
-	 '(:visible (equal mml2015-use 'epg)))
+	 '(:visible (and (boundp 'mml2015-use) (equal mml2015-use 'epg))))
      ,@(if (featurep 'xemacs) '(t)
 	 '(:help "Display the EasyPG manual"))]))