nnir.el (nnir-request-set-mark): Make sure we are in the right group.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9f5eeb8..4135c38 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-04-14  Andrew Cohen  <cohen@bu.edu>
+
+       * nnir.el (nnir-request-set-mark): Make sure we are in the right
+       group. 
+
 2013-04-10  Andrew Cohen  <cohen@bu.edu>
 
        * nnir.el (number-sequence): No longer used.

diff --git a/lisp/nnir.el b/lisp/nnir.el
index 882e863..24f2a55 100644 (file)
--- a/lisp/nnir.el
+++ b/lisp/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)