2001-08-23 21:00:00 ShengHuo ZHU <zsh@cs.rochester.edu>

	* gnus-util.el (gnus-create-info-command): Return an interactive
	function.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 777f458..7753522 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2001-08-23 21:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * gnus-util.el (gnus-create-info-command): Return an interactive
+       function.
+
 2001-08-23 19:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
        From Katsumi Yamaoka <yamaoka@jpl.org>
 

diff --git a/lisp/gnus-util.el b/lisp/gnus-util.el
index dec85cd..c599ba8 100644 (file)
--- a/lisp/gnus-util.el
+++ b/lisp/gnus-util.el
@@ -1064,6 +1064,7 @@ sure of changing the value of `foo'."
 (defun gnus-create-info-command (node)
   "Create a command that will go to info NODE."
   `(lambda ()
+     (interactive)
      ,(concat "Enter the info system at node " node)
      (Info-goto-node ,node)
      (setq gnus-info-buffer (current-buffer))