procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make `move article' work again (bug#33653)

Browse source 
* lisp/gnus/gnus-sum.el (gnus-summary-move-article): Back to while loop
m dolist that blocks nov and active from saving (bug#33653).
This commit is contained in:
Katsumi Yamaoka 2019-04-05 04:25:06 +00:00
parent a68c968632
commit 9da8f22de0
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/gnus/gnus-sum.el
View file

@ -9979,7 +9979,7 @@ ACTION can be either `move' (the default), `crosspost' or `copy'."
(crosspost "Crosspost" "Crossposting")))
(copy-buf (save-excursion
(nnheader-set-temp-buffer " *copy article*")))
art-group to-method new-xref to-groups
art-group to-method new-xref article to-groups
articles-to-update-marks encoded)
(unless (assq action names)
(error "Unknown action %s" action))
@ -10029,7 +10029,8 @@ ACTION can be either `move' (the default), `crosspost' or `copy'."
(or (car select-method)
(gnus-group-decoded-name to-newsgroup))
articles)
(dolist (article articles)
(while articles
(setq article (pop articles))
;; Set any marks that may have changed in the summary buffer.
(when gnus-preserve-marks
(gnus-summary-push-marks-to-backend article))