From: okazaki Date: Fri, 27 Oct 2000 08:16:26 +0000 (+0000) Subject: * wl-template.el: Doc fixes. X-Git-Tag: wl-2_4-root~62 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=0f37bbd8fd715034efcabd939d59573cf6a4c60a;p=elisp%2Fwanderlust.git * wl-template.el: Doc fixes. --- diff --git a/wl/wl-template.el b/wl/wl-template.el index b8be5ed..d143696 100644 --- a/wl/wl-template.el +++ b/wl/wl-template.el @@ -52,7 +52,7 @@ (define-key wl-template-mode-map "\n" 'wl-template-set)) (defun wl-template-apply (name) - "Apply NAME templete to draft." + "Apply NAME template to draft." (let (template) (when name (if (string= name "") @@ -86,7 +86,7 @@ Enterring WL-Template mode calls the value of `wl-template-mode-hook'." (run-hooks 'wl-template-mode-hook)) (defun wl-template-select () - "Select templete from `wl-template-alist'." + "Select template from `wl-template-alist'." (interactive) (if (not wl-template-visible-select) (wl-template-apply @@ -183,7 +183,7 @@ ARG is ignored." ; ARG ignored this version (?) (if win (select-window win)))))) (defun wl-template-insert (name &optional mail-header) - "Insert NAME templete. + "Insert NAME template. Set header-separator is MAIL-HEADER." (let ((template (cdr (assoc name wl-template-alist))) (mail-header-separator (or mail-header