From 6202d76b564a396ca52e12388db0ba5701143a35 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Tue, 19 Dec 2000 13:11:00 +0000 Subject: [PATCH] * wl-draft.el (wl-draft-reply): Bind `mime-header-lexical-analyzer' to the default value as well as `eword-lexical-analyzer'. --- wl/ChangeLog | 5 +++++ wl/wl-draft.el | 16 +++++++++------- 2 files changed, 14 insertions(+), 7 deletions(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index 4b5cc6e..a943edc 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2000-12-19 Katsumi Yamaoka + + * wl-draft.el (wl-draft-reply): Bind `mime-header-lexical-analyzer' + to the default value as well as `eword-lexical-analyzer'. + 2000-12-19 TAKAHASHI Kaoru * wl-version.el (wl-extended-emacs-version, diff --git a/wl/wl-draft.el b/wl/wl-draft.el index 73ff2ac..b88fa02 100644 --- a/wl/wl-draft.el +++ b/wl/wl-draft.el @@ -287,15 +287,17 @@ the `wl-smtp-features' variable." "" ;;;(save-excursion (let (r-list - (eword-lexical-analyzer '(eword-analyze-quoted-string - eword-analyze-domain-literal - eword-analyze-comment - eword-analyze-spaces - eword-analyze-special - eword-analyze-encoded-word - eword-analyze-atom)) + (mime-header-lexical-analyzer '(eword-analyze-quoted-string + eword-analyze-domain-literal + eword-analyze-comment + eword-analyze-spaces + eword-analyze-special + eword-analyze-encoded-word + eword-analyze-atom)) + eword-lexical-analyzer to mail-followup-to cc subject in-reply-to references newsgroups from to-alist cc-alist) + (setq eword-lexical-analyzer mime-header-lexical-analyzer) (set-buffer buf) (setq from (wl-address-header-extract-address (std11-field-body "From"))) (setq r-list -- 1.7.10.4