mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-30 04:10:54 -08:00
lisp/gnus/nnir.el (nnir-request-set-mark): Make sure we are in the right group
This commit is contained in:
parent
54ac5d4745
commit
35c5bbbad0
2 changed files with 7 additions and 1 deletions
|
|
@ -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-12 Katsumi Yamaoka <yamaoka@jpl.org>
|
||||
|
||||
* gnus-msg.el (gnus-msg-mail): Make it avoid using posting styles
|
||||
|
|
|
|||
|
|
@ -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)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue