From: akr <akr>
Date: Tue, 27 Oct 1998 06:00:56 +0000 (+0000)
Subject: * eword-encode.el (eword-encode-field-body): Unfold `field-body'.
X-Git-Tag: doodle-1_11_1~1
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=020bf427690e18c1068fd87bc207fc9201761b54;p=elisp%2Fflim.git

* eword-encode.el (eword-encode-field-body): Unfold `field-body'.
---

diff --git a/ChangeLog b/ChangeLog
index 08d3d31..d5f6450 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1252,6 +1252,10 @@
 	* eword-decode.el: Copied from AKEMI branch of SEMI.
 
 
+1998-10-27  Tanaka Akira  <akr@jaist.ac.jp>
+
+        * eword-encode.el (eword-encode-field-body): Unfold `field-body'.
+
 1998-10-26  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
 
 	* FLIM: Version 1.11.2 (Heij-Dò)-A was released.
diff --git a/eword-encode.el b/eword-encode.el
index 52390c7..fecd854 100644
--- a/eword-encode.el
+++ b/eword-encode.el
@@ -596,6 +596,7 @@ Optional argument COLUMN is start-position of the field."
   "Encode FIELD-BODY as FIELD-NAME, and return the result.
 A lexical token includes non-ASCII character is encoded as MIME
 encoded-word.  ASCII token is not encoded."
+  (setq field-body (std11-unfold-string field-body))
   (if (string= field-body "")
       ""
     (let (start)