aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLars Magne Ingebrigtsen2015-01-29 14:02:04 +0000
committerKatsumi Yamaoka2015-01-29 14:02:04 +0000
commit0c7b0967d262bd361de721d0d7a4da192bde1319 (patch)
tree3647f4b7ac49fff8844c763b8d1df61a6aed37fa
parentcfb188718998d2bfbbee17567c9527a20518547f (diff)
downloademacs-0c7b0967d262bd361de721d0d7a4da192bde1319.tar.gz
emacs-0c7b0967d262bd361de721d0d7a4da192bde1319.zip
lisp/gnus/nnimap.el (nnimap-request-group): Make it possible to enter nnimap groups again
-rw-r--r--lisp/gnus/ChangeLog2
-rw-r--r--lisp/gnus/nnimap.el7
2 files changed, 5 insertions, 4 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index e4818d44a1c..64608d3bda0 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -2,6 +2,8 @@
2 2
3 * nnimap.el (nnimap-request-group): Allow running this function on 3 * nnimap.el (nnimap-request-group): Allow running this function on
4 groups that don't exist in Gnus yet. 4 groups that don't exist in Gnus yet.
5 (nnimap-request-group): Revert previous patch since that made it
6 impossible to enter nnimap groups.
5 7
6 * message.el (message-smtpmail-send-it): Remove the mail header 8 * message.el (message-smtpmail-send-it): Remove the mail header
7 separator before sending. 9 separator before sending.
diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el
index 0fe2bb5872c..e619c0f13c2 100644
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -804,10 +804,9 @@ textual parts.")
804 articles active marks high low) 804 articles active marks high low)
805 (with-current-buffer nntp-server-buffer 805 (with-current-buffer nntp-server-buffer
806 (when result 806 (when result
807 (when (and info 807 (when (or (not dont-check)
808 (or (not dont-check) 808 (not (setq active
809 (not (setq active 809 (nth 2 (assoc group nnimap-current-infos)))))
810 (nth 2 (assoc group nnimap-current-infos))))))
811 (let ((sequences (nnimap-retrieve-group-data-early 810 (let ((sequences (nnimap-retrieve-group-data-early
812 server (list info)))) 811 server (list info))))
813 (nnimap-finish-retrieve-group-infos server (list info) sequences 812 (nnimap-finish-retrieve-group-infos server (list info) sequences