master e54feef094a: Expunge immediately when moving articles from nnimap groups

[Andrew G Cohen]

branch: master
commit e54feef094a273cea28c980df57de0808cc7ef30
Author: Andrew G Cohen <cohen@andy.bu.edu>
Commit: Andrew G Cohen <cohen@andy.bu.edu>

    Expunge immediately when moving articles from nnimap groups
    
    * lisp/gnus/nnselect.el (nnselect-request-move-article): Set
    nnimap-expunge to immediately.
---
 lisp/gnus/nnselect.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/gnus/nnselect.el b/lisp/gnus/nnselect.el
index af4dbdc35df..57a833de9bf 100644
--- a/lisp/gnus/nnselect.el
+++ b/lisp/gnus/nnselect.el
@@ -478,7 +478,8 @@ artlist; otherwise store the ARTLIST in the group 
parameters."
 
 (deffoo nnselect-request-move-article
     (article _group _server accept-form &optional last _internal-move-group)
-  (let* ((artgroup (nnselect-article-group article))
+  (let* ((nnimap-expunge 'immediately)
+         (artgroup (nnselect-article-group article))
         (artnumber (nnselect-article-number article))
         (to-newsgroup (nth 1 accept-form))
         (to-method (gnus-find-method-for-group to-newsgroup))