gnus-sum.el (gnus-summary-move-article): Fix `while' loop to make it work for two...

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4021750..9cb9d1b 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2010-11-15  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * gnus-sum.el (gnus-summary-move-article): Fix `while' loop to make it
+       work for two or more articles.
+
 2010-11-12  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * gnus-art.el (article-treat-non-ascii): Keep text properties not to

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 9729480..9370742 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -9901,7 +9901,7 @@ ACTION can be either `move' (the default), `crosspost' or `copy'."
          (save-excursion
            (gnus-summary-goto-subject article)
            (gnus-summary-mark-article article gnus-canceled-mark)))))
-      (push article articles-to-update-marks))
+      (push article articles-to-update-marks)))
 
     (save-excursion
       (apply 'gnus-summary-remove-process-mark articles-to-update-marks))
@@ -9912,7 +9912,7 @@ ACTION can be either `move' (the default), `crosspost' or `copy'."
 
     (gnus-kill-buffer copy-buf)
     (gnus-summary-position-point)
-    (gnus-set-mode-line 'summary))))
+    (gnus-set-mode-line 'summary)))
 
 (defun gnus-summary-copy-article (&optional n to-newsgroup select-method)
   "Copy the current article to some other group.