X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fgnus-group.el;h=31078be48aa5ca8e4437a0c9023c2a218026dde0;hb=2095aa688cfe9a35e2b27c15e4226c3206e874fc;hp=eb8421c3a4b8a2f529cbc814261abb1c4a53b17b;hpb=b4bc300f0dcddc2b17bb50a3501ed6e6db1ef12c;p=gnus

diff --git a/lisp/gnus-group.el b/lisp/gnus-group.el
index eb8421c3a..31078be48 100644
--- a/lisp/gnus-group.el
+++ b/lisp/gnus-group.el
@@ -24,10 +24,6 @@
 
 ;;; Code:
 
-;; For Emacs <22.2 and XEmacs.
-(eval-and-compile
-  (unless (fboundp 'declare-function) (defmacro declare-function (&rest r))))
-
 (eval-when-compile
   (require 'cl))
 (defvar tool-bar-mode)
@@ -2728,7 +2724,7 @@ server."
   (interactive
    (list
     (gnus-read-group "Group name: ")
-    (gnus-read-method "From method")))
+    (gnus-read-method "Select method for new group (use tab for completion)")))
 
   (when (stringp method)
     (setq method (or (gnus-server-to-method method) method)))