(gnus-group-group-map, gnus-group-make-menu-bar):

Revert part of 2004-07-17 change below.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e60b7bd..4cd0611 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2004-07-26  Simon Josefsson  <jas@extundo.com>
+
+       * gnus-group.el (gnus-group-group-map, gnus-group-make-menu-bar):
+       Revert part of 2004-07-17 change below.
+
 2004-07-25  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * rfc2047.el (rfc2047-encode-region): Don't infloop.  Suggested by

diff --git a/lisp/gnus-group.el b/lisp/gnus-group.el
index 70a59a4..222c4f2 100644 (file)
--- a/lisp/gnus-group.el
+++ b/lisp/gnus-group.el
@@ -632,7 +632,7 @@ simple manner.")
   "a" gnus-group-make-archive-group
   "k" gnus-group-make-kiboze-group
   "l" gnus-group-nnimap-edit-acl
-  "m" gnus-group-make-group-simple
+  "m" gnus-group-make-group
   "E" gnus-group-edit-group
   "e" gnus-group-edit-group-method
   "p" gnus-group-edit-group-parameters
@@ -899,7 +899,7 @@ simple manner.")
         gnus-zombie-list]
        ["Kill all groups on level..." gnus-group-kill-level t])
        ("Foreign groups"
-       ["Make a foreign group..." gnus-group-make-group-simple t]
+       ["Make a foreign group..." gnus-group-make-group t]
        ["Add a directory group..." gnus-group-make-directory-group t]
        ["Add the help group" gnus-group-make-help-group t]
        ["Add the archive group" gnus-group-make-archive-group t]