* wl-summary.el (wl-summary-cleanup-temp-marks): Cleanup correctly

even if there are target marks only.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 884e540..215e4c2 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2006-09-22  Yoichi NAKAYAMA  <yoichi@geiin.org>
+
+       * wl-summary.el (wl-summary-cleanup-temp-marks): Cleanup correctly
+       even if there are target marks only.
+
 2006-09-21  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
        * Version number is increased to 2.15.4.

diff --git a/wl/wl-summary.el b/wl/wl-summary.el
index 9624b09..15cea7b 100644 (file)
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -1260,9 +1260,9 @@ This function is defined by `wl-summary-define-sort-command'." sort-by)
   (when wl-summary-buffer-temp-mark-list
     (wl-summary-exec-with-confirmation
      (format "Execute marks in %s? (answer \"n\" to discard them) "
-            (wl-summary-buffer-folder-name)))
-    (wl-summary-delete-all-temp-marks 'no-msg)
-    (setq wl-summary-scored nil)))
+            (wl-summary-buffer-folder-name))))
+  (wl-summary-delete-all-temp-marks 'no-msg)
+  (setq wl-summary-scored nil))
 
 ;; a subroutine for wl-summary-exit/wl-save-status
 ;; Note that folder is not commited here.