* wl-draft.el (wl-draft-default-headers): Suppress warning

"defsubst `wl-draft-default-headers' was used before it was
defined"; Use `defun' instead of `defsubst'.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 0f907f9..e39191d 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,5 +1,9 @@
 2010-01-02  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
+       * wl-draft.el (wl-draft-default-headers): Suppress warning
+       "defsubst `wl-draft-default-headers' was used before it was
+       defined"; Use `defun' instead of `defsubst'.
+
        * wl-address.el (wl-address-header-extract-address)
        (wl-address-header-extract-realname): Fix mail-address in
        docstring.

diff --git a/wl/wl-draft.el b/wl/wl-draft.el
index 4ebc129..947100a 100644 (file)
--- a/wl/wl-draft.el
+++ b/wl/wl-draft.el
@@ -1848,7 +1848,7 @@ If KILL-WHEN-DONE is non-nil, current draft buffer is killed"
        field
       nil)))
 
-(defsubst wl-draft-default-headers ()
+(defun wl-draft-default-headers ()
   (list
    (cons 'Mail-Reply-To (and wl-insert-mail-reply-to
                             (wl-address-header-extract-address