(wl-summary-put-temp-mark): Use (delete-char -1) instead of

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

diff --git a/wl/wl-summary.el b/wl/wl-summary.el
index 72811d5..eff7f67 100644 (file)
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -3008,7 +3008,7 @@ The mark is decided according to the FOLDER and STATUS."
       (let ((inhibit-read-only t)
            (buffer-read-only nil))
        (move-to-column wl-summary-buffer-temp-mark-column)
-       (delete-backward-char 1)
+       (delete-char -1)
        (insert mark)))))
 
 (defun wl-summary-next-buffer ()