From: yoichi <yoichi>
Date: Fri, 8 Nov 2002 08:12:38 +0000 (+0000)
Subject: Fix the last change to restore cursor point.
X-Git-Tag: wl-2_11_1~59
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=2cc9e0ddfb4f35f12401fba6be5b6a5f9f7de4e5;p=elisp%2Fwanderlust.git

Fix the last change to restore cursor point.
---

diff --git a/wl/wl-summary.el b/wl/wl-summary.el
index ce86452..f1ece4f 100644
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -3153,7 +3153,7 @@ If optional argument NUMBER is specified, mark message specified by NUMBER."
 	      (wl-summary-unmark msg-num)
 	      (elmo-folder-delete-messages wl-summary-buffer-elmo-folder
 					   (list msg-num))
-	      (wl-summary-sync nil "update")))))
+	      (save-excursion (wl-summary-sync nil "update"))))))
     (message "Read-only folder.")))
 
 (defun wl-summary-read-folder (default &optional purpose ignore-error