Prepare for 2.10.1.

[elisp/wanderlust.git] / wl / wl-expire.el

diff --git a/wl/wl-expire.el b/wl/wl-expire.el
index e3fc142..165e07e 100644 (file)
--- a/wl/wl-expire.el
+++ b/wl/wl-expire.el
@@ -744,7 +744,7 @@ ex. +ml/wl/1999_11/, +ml/wl/1999_12/."
            (setq ret-val (wl-summary-expire folder (not update-msgdb)))
            (if update-msgdb
                (progn
-                 (wl-summary-save-view 'keep)
+                 (wl-summary-save-view)
                  (elmo-folder-commit wl-summary-buffer-elmo-folder))
              (if ret-val
                  (wl-folder-check-entity entity))))))))))
@@ -880,7 +880,7 @@ ex. +ml/wl/1999_11/, +ml/wl/1999_12/."
        (if (file-writable-p filename)
            (write-region (point-min) (point-max)
                          filename t 'no-msg)
-         (message (format "%s is not writable." filename)))
+         (message "%s is not writable." filename))
        (kill-buffer tmp-buf)))))
 
 (require 'product)