mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-04 06:31:13 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/gnus/nnir.el (nnir-request-update-mark):

Browse source 
Default to the original mark.
cf. <http://thread.gmane.org/gmane.emacs.gnus.general/86583>
and <http://thread.gmane.org/gmane.emacs.gnus.general/86640>
This commit is contained in:
Katsumi Yamaoka 2016-01-19 22:10:09 +00:00
parent 9d00392520
commit 406887f5ef
1 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/gnus/nnir.el
View file

@ -822,8 +822,10 @@ skips all prompting."
(deffoo nnir-request-update-mark (group article mark)
(let ((artgroup (nnir-article-group article))
(artnumber (nnir-article-number article)))
(when (and artgroup artnumber)
(gnus-request-update-mark artgroup artnumber mark))))
(or (and artgroup
artnumber
(gnus-request-update-mark artgroup artnumber mark))
mark)))
(deffoo nnir-request-set-mark (group actions &optional server)
(nnir-possibly-change-group group server)