summaryrefslogtreecommitdiff
path: root/lisp/gnus/nnir.el
diff options
context:
space:
mode:
authorAndrew Cohen <cohen@bu.edu>2013-04-14 22:16:44 +0000
committerKatsumi Yamaoka <yamaoka@jpl.org>2013-04-14 22:16:44 +0000
commit35c5bbbad00618df4d4d738bbd6b6ea9023922eb (patch)
treef1f151b3ad8798de38c10da58cb52f1b27a43a66 /lisp/gnus/nnir.el
parent54ac5d47456e1dd989c8fa346e5543556fa82444 (diff)
downloademacs-35c5bbbad00618df4d4d738bbd6b6ea9023922eb.tar.gz
lisp/gnus/nnir.el (nnir-request-set-mark): Make sure we are in the right group
Diffstat (limited to 'lisp/gnus/nnir.el')
-rw-r--r--lisp/gnus/nnir.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/gnus/nnir.el b/lisp/gnus/nnir.el
index 5d244a019cb..2fa6b600ac1 100644
--- a/lisp/gnus/nnir.el
+++ b/lisp/gnus/nnir.el
@@ -837,6 +837,7 @@ skips all prompting."
(gnus-request-update-mark artgroup artnumber mark)))
(deffoo nnir-request-set-mark (group actions &optional server)
+ (nnir-possibly-change-group group server)
(let (mlist)
(dolist (action actions)
(destructuring-bind (range action marks) action
@@ -853,7 +854,7 @@ skips all prompting."
(deffoo nnir-request-update-info (group info &optional server)
- (nnir-possibly-change-group group)
+ (nnir-possibly-change-group group server)
;; clear out all existing marks.
(gnus-info-set-marks info nil)
(gnus-info-set-read info nil)