[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master cfb1887: lisp/gnus/nnimap.el (nnimap-request-group)
From: |
Katsumi Yamaoka |
Subject: |
[Emacs-diffs] master cfb1887: lisp/gnus/nnimap.el (nnimap-request-group): nnimap group activation problems fixed |
Date: |
Thu, 29 Jan 2015 09:20:48 +0000 |
branch: master
commit cfb188718998d2bfbbee17567c9527a20518547f
Author: Lars Magne Ingebrigtsen <address@hidden>
Commit: Katsumi Yamaoka <address@hidden>
lisp/gnus/nnimap.el (nnimap-request-group): nnimap group activation
problems fixed
---
lisp/gnus/ChangeLog | 3 +++
lisp/gnus/nnimap.el | 7 ++++---
2 files changed, 7 insertions(+), 3 deletions(-)
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 3927f09..e4818d4 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,5 +1,8 @@
2015-01-29 Lars Ingebrigtsen <address@hidden>
+ * nnimap.el (nnimap-request-group): Allow running this function on
+ groups that don't exist in Gnus yet.
+
* message.el (message-smtpmail-send-it): Remove the mail header
separator before sending.
diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el
index e619c0f..0fe2bb5 100644
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -804,9 +804,10 @@ textual parts.")
articles active marks high low)
(with-current-buffer nntp-server-buffer
(when result
- (when (or (not dont-check)
- (not (setq active
- (nth 2 (assoc group nnimap-current-infos)))))
+ (when (and info
+ (or (not dont-check)
+ (not (setq active
+ (nth 2 (assoc group nnimap-current-infos))))))
(let ((sequences (nnimap-retrieve-group-data-early
server (list info))))
(nnimap-finish-retrieve-group-infos server (list info) sequences
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master cfb1887: lisp/gnus/nnimap.el (nnimap-request-group): nnimap group activation problems fixed,
Katsumi Yamaoka <=