# HG changeset patch # User Glenn Morris # Date 1206947926 0 # Node ID 06240ef0da8e3ddbab66f30f233fe68f1113ace8 # Parent 965ede514c5aa046696658ee69224778c44cade7 (mml2015-use): Declare for compiler. (message-info): Require mml2015 when appropriate. diff -r 965ede514c5a -r 06240ef0da8e lisp/gnus/message.el --- a/lisp/gnus/message.el Mon Mar 31 07:11:00 2008 +0000 +++ b/lisp/gnus/message.el Mon Mar 31 07:18:46 2008 +0000 @@ -2489,6 +2489,7 @@ (autoload 'Info-goto-node "info") +(defvar mml2015-use) (defun message-info (&optional arg) "Display the Message manual. @@ -2497,8 +2498,11 @@ manual. With two \\[universal-argument]'s, display the EasyPG or PGG manual, depending on the value of `mml2015-use'." (interactive "p") + ;; Why not `info', which is in loaddefs.el? (Info-goto-node (format "(%s)Top" - (cond ((eq arg 16) mml2015-use) + (cond ((eq arg 16) + (require 'mml2015) + mml2015-use) ((eq arg 4) 'emacs-mime) ;; `booleanp' only available in Emacs 22+ ((and (not (memq arg '(nil t)))