From: Katsumi Yamaoka <yamaoka@jpl.org>
Date: Tue, 19 Jan 2016 22:10:09 +0000 (+0000)
Subject: * lisp/gnus/nnir.el (nnir-request-update-mark):
X-Git-Tag: emacs-25.0.90~118
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=406887f5ef286270a5b5d00523f2eaf449db4ced;p=emacs.git

* lisp/gnus/nnir.el (nnir-request-update-mark):
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>
---

diff --git a/lisp/gnus/nnir.el b/lisp/gnus/nnir.el
index 183e1443dac..560ba8ad2e5 100644
--- a/lisp/gnus/nnir.el
+++ b/lisp/gnus/nnir.el
@@ -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)