From 6a7f5dbcd3d83ea7e3f7d3ca4cb2810b8e69fd77 Mon Sep 17 00:00:00 2001 From: teranisi Date: Wed, 20 Feb 2002 02:15:57 +0000 Subject: [PATCH] * wl-draft.el (wl-draft-send): Use mime-header-encode-method-alist only if it is bound as variable. * wl-mime.el (wl-draft-preview-message): Ditto. --- wl/ChangeLog | 5 ++++- wl/wl-draft.el | 4 ++-- wl/wl-mime.el | 3 ++- 3 files changed, 8 insertions(+), 4 deletions(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index 5272b6a..7a44cb6 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,6 +1,9 @@ 2002-02-20 Yuuichi Teranishi - * wl-draft.el (toplevel): require 'eword-encode. + * wl-draft.el (wl-draft-send): Use mime-header-encode-method-alist + only if it is bound as variable. + + * wl-mime.el (wl-draft-preview-message): Ditto. 2002-02-19 Yuuichi Teranishi diff --git a/wl/wl-draft.el b/wl/wl-draft.el index 0f70e5b..f565437 100644 --- a/wl/wl-draft.el +++ b/wl/wl-draft.el @@ -37,7 +37,6 @@ (condition-case nil (require 'timezone) (error nil)) (require 'std11) (require 'wl-vars) -(require 'eword-encode) (defvar x-face-add-x-face-version-header) (defvar mail-reply-buffer) @@ -1212,7 +1211,8 @@ If KILL-WHEN-DONE is non-nil, current draft buffer is killed" (append '((wl-draft-eword-encode-address-list . (To Cc Bcc Resent-To Resent-Cc Bcc Resent-Bcc))) - mime-header-encode-method-alist))) + (if (boundp 'mime-header-encode-method-alist) + (symbol-value 'mime-header-encode-method-alist))))) (run-hooks 'mail-send-hook) ; translate buffer ) (if wl-draft-verbose-send diff --git a/wl/wl-mime.el b/wl/wl-mime.el index 4bc9670..63e00df 100644 --- a/wl/wl-mime.el +++ b/wl/wl-mime.el @@ -78,7 +78,8 @@ By setting following-method as yank-content." (append '((wl-draft-eword-encode-address-list . (To Cc Bcc Resent-To Resent-Cc Bcc Resent-Bcc))) - mime-header-encode-method-alist)) + (if (boundp 'mime-header-encode-method-alist) + (symbol-value 'mime-header-encode-method-alist)))) mime-view-ignored-field-list ; all header. (mime-edit-translate-buffer-hook (append -- 1.7.10.4