From: yamaoka Date: Tue, 25 Nov 2008 23:32:43 +0000 (+0000) Subject: (eword-decode-string, eword-decode-region): Mention language info in doc string. X-Git-Tag: flim-1_14-wl-root~6 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=d71b8fab64f60baeda41d4956e2a09923f6334c1;p=elisp%2Fflim.git (eword-decode-string, eword-decode-region): Mention language info in doc string. --- diff --git a/ChangeLog b/ChangeLog index e52b052..759ceb4 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 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