From 4ae9f7b017505948247c16731ff176f0c4b7d65b Mon Sep 17 00:00:00 2001 From: yamaoka Date: Tue, 25 Nov 2008 23:32:44 +0000 Subject: [PATCH] (eword-decode-string, eword-decode-region): Mention language info in doc string. --- ChangeLog | 5 +++++ eword-decode.el | 10 ++++++++-- 2 files changed, 13 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index 4fe6bd0..e046d9a 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,10 @@ 2008-11-25 Katsumi Yamaoka + * eword-decode.el (eword-decode-string, eword-decode-region): + Mention language info in doc string. + +2008-11-25 Katsumi Yamaoka + * 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 880c53e..21fa6e3 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) @@ -227,7 +230,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 -- 1.7.10.4