projects
/
gnus
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
gnus-art.el (gnus-mm-display-part): Bugfix for the 2014-02-05 change
[gnus]
/
lisp
/
gnus-group.el
diff --git
a/lisp/gnus-group.el
b/lisp/gnus-group.el
index
5cd2add
..
31078be
100644
(file)
--- a/
lisp/gnus-group.el
+++ b/
lisp/gnus-group.el
@@
-1,6
+1,6
@@
;;; gnus-group.el --- group mode commands for Gnus
;;; gnus-group.el --- group mode commands for Gnus
-;; Copyright (C) 1996-201
3
Free Software Foundation, Inc.
+;; Copyright (C) 1996-201
4
Free Software Foundation, Inc.
;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
;; Keywords: news
;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
;; Keywords: news
@@
-24,10
+24,6
@@
;;; Code:
;;; 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)
(eval-when-compile
(require 'cl))
(defvar tool-bar-mode)
@@
-2728,7
+2724,7
@@
server."
(interactive
(list
(gnus-read-group "Group name: ")
(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)))
(when (stringp method)
(setq method (or (gnus-server-to-method method) method)))