From d607f2aa98d0e6683f78e487e19279b300241a49 Mon Sep 17 00:00:00 2001 From: kaoru Date: Mon, 26 Aug 2002 12:10:06 +0000 Subject: [PATCH] * wl-draft.el (wl-draft-insert-x-face-field): Use `goto-char' instead of `beginning-of-buffer'. --- wl/ChangeLog | 5 +++++ wl/wl-draft.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index d35e576..565c24e 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2002-08-26 TAKAHASHI Kaoru + + * wl-draft.el (wl-draft-insert-x-face-field): Use `goto-char' + instead of `beginning-of-buffer'. + 2002-08-22 Katsumi Yamaoka * wl-xmas.el (wl-message-wheel-down): Fix parentheses. diff --git a/wl/wl-draft.el b/wl/wl-draft.el index 9db958a..05d6955 100644 --- a/wl/wl-draft.el +++ b/wl/wl-draft.el @@ -191,7 +191,7 @@ (interactive) (if (not (file-exists-p wl-x-face-file)) (error "File %s does not exist" wl-x-face-file) - (beginning-of-buffer) + (goto-char (point-min)) (search-forward mail-header-separator nil t) (beginning-of-line) (wl-draft-insert-x-face-field-here) -- 1.7.10.4