* wl-mime.el (wl-draft-attribute-value): Fixed.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 3dcfc50..dc29d37 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,7 @@
+2003-09-04  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+       * wl-mime.el (wl-draft-attribute-value): Fixed.
+
 2003-09-03  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
        * wl-util.el (wl-copy-local-variables): New function.

diff --git a/wl/wl-mime.el b/wl/wl-mime.el
index a03e01c..f9f4b7e 100644 (file)
--- a/wl/wl-mime.el
+++ b/wl/wl-mime.el
@@ -183,8 +183,8 @@ It calls following-method selected from variable
          ((and (setq symbol (intern-soft (format "wl-%s" name)))
                (boundp symbol))
           (symbol-value symbol))
-         (t
-          attr))))
+         ((boundp attr)
+          (symbol-value attr)))))
 
 (defun wl-draft-preview-message ()
   "Preview editing message."