* wl-addrmgr.el(wl-addrmgr-mark-write): Use `string-to-char' instead of `? '. Use...

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

diff --git a/wl/wl-template.el b/wl/wl-template.el
index cac3404..a17c4a7 100644 (file)
--- a/wl/wl-template.el
+++ b/wl/wl-template.el
@@ -135,8 +135,7 @@ Entering WL-Template mode calls the value of `wl-template-mode-hook'."
 (defun wl-template-show (&optional arg)
   "Show reference INDEX in `wl-template-alist'.
 ARG is ignored."                       ; ARG ignored this version (?)
-  (save-excursion
-    (set-buffer wl-template-buffer-name)
+  (with-current-buffer wl-template-buffer-name
     (let ((buffer-read-only nil)
          (wl-template-preview t)
          (mail-header-separator  "--header separater--"))