diff options
| author | Lars Magne Ingebrigtsen | 2011-09-15 05:46:40 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka | 2011-09-15 05:46:40 +0000 |
| commit | 7985478fe5baf91c0de4326ed1787f79390f6a4a (patch) | |
| tree | 98b191b1979b2258f71b2ea1974cee06c05a9027 | |
| parent | 088f329c332c6dc6a83336a6817ed9014bfbfb33 (diff) | |
| download | emacs-7985478fe5baf91c0de4326ed1787f79390f6a4a.tar.gz emacs-7985478fe5baf91c0de4326ed1787f79390f6a4a.zip | |
gnus-sum.el (gnus-summary-read-group-1): Bump the "Retrieving" message level.
| -rw-r--r-- | lisp/gnus/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/gnus/gnus-sum.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 39afcb0cef6..211c4455717 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2011-09-15 Lars Magne Ingebrigtsen <larsi@gnus.org> | ||
| 2 | |||
| 3 | * gnus-sum.el (gnus-summary-read-group-1): Bump the "Retrieving" | ||
| 4 | message level. | ||
| 5 | |||
| 1 | 2011-09-15 Katsumi Yamaoka <yamaoka@jpl.org> | 6 | 2011-09-15 Katsumi Yamaoka <yamaoka@jpl.org> |
| 2 | 7 | ||
| 3 | * message.el (message-read-from-minibuffer): Make abbrev expansion work. | 8 | * message.el (message-read-from-minibuffer): Make abbrev expansion work. |
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el index 8651b583757..423de352453 100644 --- a/lisp/gnus/gnus-sum.el +++ b/lisp/gnus/gnus-sum.el | |||
| @@ -3961,7 +3961,7 @@ If NO-DISPLAY, don't generate a summary buffer." | |||
| 3961 | ;; (when (and (not (gnus-group-native-p group)) | 3961 | ;; (when (and (not (gnus-group-native-p group)) |
| 3962 | ;; (not (gnus-gethash group gnus-newsrc-hashtb))) | 3962 | ;; (not (gnus-gethash group gnus-newsrc-hashtb))) |
| 3963 | ;; (error "Dead non-native groups can't be entered")) | 3963 | ;; (error "Dead non-native groups can't be entered")) |
| 3964 | (gnus-message 5 "Retrieving newsgroup: %s..." | 3964 | (gnus-message 7 "Retrieving newsgroup: %s..." |
| 3965 | (gnus-group-decoded-name group)) | 3965 | (gnus-group-decoded-name group)) |
| 3966 | (let* ((new-group (gnus-summary-setup-buffer group)) | 3966 | (let* ((new-group (gnus-summary-setup-buffer group)) |
| 3967 | (quit-config (gnus-group-quit-config group)) | 3967 | (quit-config (gnus-group-quit-config group)) |