From 641767eeab1fe2d715ebe4e836b5e24068145966 Mon Sep 17 00:00:00 2001 From: kaoru Date: Fri, 1 Jan 2010 07:59:28 +0000 Subject: [PATCH] * wl-action.el (wl-summary-auto-refile): Use `goto-char' instead of `goto-line'. --- wl/ChangeLog | 3 +++ wl/wl-action.el | 2 +- 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index 277a5a8..b9c9fb7 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -2,6 +2,9 @@ * wl-demo.el (wl-demo-copyright-notice): Add 2010. + * wl-action.el (wl-summary-auto-refile): Use `goto-char' instead + of `goto-line'. + 2009-12-16 Lloyd Zusman * wl-summary.el (wl-summary-detect-mark-position): Force diff --git a/wl/wl-action.el b/wl/wl-action.el index d82580e..008649e 100644 --- a/wl/wl-action.el +++ b/wl/wl-action.el @@ -825,7 +825,7 @@ Return number if put mark succeed" checked-dsts (count 0) number dst thr-entity) - (goto-line 1) + (goto-char (point-min)) (while (not (eobp)) (setq number (wl-summary-message-number)) (dolist (number (cons number -- 1.7.10.4