X-Git-Url: http://git.chise.org/gitweb/?p=elisp%2Fflim.git;a=blobdiff_plain;f=eword-decode.el;fp=eword-decode.el;h=402ca36168db59137cbc04d284df6506714d37f6;hp=3ca4b010ca84eca16e630c007654a3bbce385ba2;hb=503d9821a9cda69c15dc33f0a7bd3d0966bc28ff;hpb=7d7a64831a517e0c596a7a0af2e4b690df50914d 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