From: yamaoka <yamaoka>
Date: Tue, 25 Nov 2008 23:32:45 +0000 (+0000)
Subject: (eword-decode-string, eword-decode-region): Mention language info in doc string.
X-Git-Url: http://git.chise.org/gitweb/?p=elisp%2Fflim.git;a=commitdiff_plain;h=refs%2Fheads%2Fflim-1_14-rfc2231-encoder

(eword-decode-string, eword-decode-region): Mention language info in doc string.
---

diff --git a/ChangeLog b/ChangeLog
index b223b2a..b4a1bbe 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,10 @@
 2008-11-25  Katsumi Yamaoka  <yamaoka@jpl.org>
 
+	* eword-decode.el (eword-decode-string, eword-decode-region):
+	Mention language info in doc string.
+
+2008-11-25  Katsumi Yamaoka  <yamaoka@jpl.org>
+
 	* eword-decode.el (eword-decode-string, eword-decode-region)
 	(eword-analyze-encoded-word): Express the language portion of an
 	encoded word as a symbol.
diff --git a/eword-decode.el b/eword-decode.el
index 3ca4b01..402ca36 100644
--- a/eword-decode.el
+++ b/eword-decode.el
@@ -87,7 +87,10 @@ decode the charset included in it, it is not decoded.
 
 If MUST-UNFOLD is non-nil, it unfolds and eliminates line-breaks even
 if there are in decoded encoded-words (generated by bad manner MUA
-such as a version of Net$cape)."
+such as a version of Net$cape).
+
+The language informations specified in the encoded words, if any, are
+put to the decoded text as the `mime-language' text property."
   (setq string (std11-unfold-string string))
   (let ((regexp (concat "[\n\t ]*\\(" eword-encoded-word-regexp "\\)"))
 	(next 0)
@@ -220,7 +223,10 @@ If UNFOLDING is not nil, it unfolds before decoding.
 
 If MUST-UNFOLD is non-nil, it unfolds and eliminates line-breaks even
 if there are in decoded encoded-words (generated by bad manner MUA
-such as a version of Net$cape)."
+such as a version of Net$cape).
+
+The language informations specified in the encoded words, if any, are
+put to the decoded text as the `mime-language' text property."
   (interactive "*r")
   (save-excursion
     (save-restriction