diff options
author | Katsumi Yamaoka <yamaoka@jpl.org> | 2013-04-10 22:17:51 +0000 |
---|---|---|
committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2013-04-10 22:17:51 +0000 |
commit | f07accae655f61468f3441dc48b61b5f125b601f (patch) | |
tree | e5424d5a58887629d9c1a013a3994f6b4972527c /lisp | |
parent | 1ec75f95d7d05d529fb1f75abe741ff77de6f16b (diff) | |
download | emacs-f07accae655f61468f3441dc48b61b5f125b601f.tar.gz emacs-f07accae655f61468f3441dc48b61b5f125b601f.tar.bz2 emacs-f07accae655f61468f3441dc48b61b5f125b601f.zip |
lisp/gnus/nnir.el: Fix last change
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/gnus/nnir.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/nnir.el b/lisp/gnus/nnir.el index 5744b1cd4b0..5d244a019cb 100644 --- a/lisp/gnus/nnir.el +++ b/lisp/gnus/nnir.el @@ -881,10 +881,10 @@ skips all prompting." articleids)))) (dolist (mark marks) (destructuring-bind (type . range) mark - (gnus-add-marked-articles + (gnus-add-marked-articles group type (delq nil - (mapcar + (mapcar #'(lambda (art) (when (gnus-member-of-range (cdr art) range) (car art))) articleids))))))))) |