Synch up with main trunk, and prepare the release 2.12.0.
[elisp/wanderlust.git] / wl / wl-expire.el
index a452149..b705c38 100644 (file)
@@ -198,7 +198,7 @@ If REFILE-LIST includes reserve mark message, so copy."
                ;; reserve mark message already refiled or expired
                (setq refile-list (delq msg refile-list))
              ;; reserve mark message not refiled
-             (wl-append wl-expired-alist (list 
+             (wl-append wl-expired-alist (list
                                           (cons msg-id
                                                 (elmo-folder-name-internal
                                                  dst-folder))))
@@ -691,7 +691,6 @@ ex. +ml/wl/1999_11/, +ml/wl/1999_12/."
              (wl-summary-delete-messages-on-buffer delete-list deleting-info)
              (wl-summary-folder-info-update)
              (wl-summary-set-message-modified)
-             (wl-summary-set-mark-modified)
              (sit-for 0)
              (set-buffer-modified-p nil))
            (wl-expired-alist-save))