mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-23 22:42:01 -07:00
Code Issues Projects Releases Wiki Activity

nnimap respool fix

Browse source 
* nnimap.el (nnimap-request-accept-article): Make respooling to nnimap
groups work again.
This commit is contained in:
Lars Ingebrigtsen 2014-03-07 18:21:35 +01:00
parent 45e2ca143d
commit d67d60a2ea
2 changed files with 13 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/gnus/ChangeLog
View file

@ -1,3 +1,8 @@
2014-03-07 Lars Ingebrigtsen <larsi@gnus.org>
* nnimap.el (nnimap-request-accept-article): Make respooling to nnimap
groups work again.
2014-03-07 George McNinch <gmcninch@gmail.com> (tiny change)
* nnir.el (nnir-run-namazu): Parse namazu results that are larger than

8
lisp/gnus/nnimap.el
View file

@ -1099,6 +1099,14 @@ If LIMIT, first try to limit the search to the N last articles."
(nnimap-wait-for-response sequence))))))
(deffoo nnimap-request-accept-article (group &optional server last)
(unless group
;; We're respooling. Find out where mail splitting would place
;; this article.
(setq group
(caar
(nnmail-article-group
`(lambda (group)
(nnml-active-number group ,server))))))
(setq group (nnimap-decode-gnus-group group))
(when (nnimap-change-group nil server)
(nnmail-check-syntax)