From 5173f6bc3138626b72eb3174f1ea12aa8e60d982 Mon Sep 17 00:00:00 2001 From: morioka Date: Wed, 30 Sep 1998 23:17:28 +0000 Subject: [PATCH] (eword-decode-and-unfold-unstructured-field): New function. --- eword-decode.el | 13 +++++++++++++ 1 file changed, 13 insertions(+) diff --git a/eword-decode.el b/eword-decode.el index ae8958b..b26bf59 100644 --- a/eword-decode.el +++ b/eword-decode.el @@ -547,6 +547,19 @@ such as a version of Net$cape)." (decode-mime-charset-string string default-mime-charset) must-unfold)) +(defun eword-decode-and-unfold-unstructured-field (string) + "Decode and unfold STRING as unstructured field body. +It decodes non us-ascii characters in FULL-NAME encoded as +encoded-words or invalid \"raw\" string. \"Raw\" non us-ascii +characters are regarded as variable `default-mime-charset'. + +If an encoded-word is broken or your emacs implementation can not +decode the charset included in it, it is not decoded." + (eword-decode-string + (decode-mime-charset-string (std11-unfold-string string) + default-mime-charset) + 'must-unfold)) + (defun eword-extract-address-components (string) "Extract full name and canonical address from STRING. Returns a list of the form (FULL-NAME CANONICAL-ADDRESS). -- 1.7.10.4