* Sync up to flim-1_10_2 from flim-1_10_0.

[elisp/flim.git] / ew-dec.el

diff --git a/ew-dec.el b/ew-dec.el
index d43b3f7..d958195 100644 (file)
--- a/ew-dec.el
+++ b/ew-dec.el
@@ -26,7 +26,7 @@ each line is separated by CRLF."
         (tmp (assoc key ew-decode-field-cache-buf)))
     (if tmp
        (cdr tmp)
-      (progn
+      (let ((decoded (ew-decode-field-no-cache field-name field-body)))
        (setq tmp (nthcdr ew-decode-field-cache-num
                          ew-decode-field-cache-buf))
        (if (cdr tmp)
@@ -38,9 +38,7 @@ each line is separated by CRLF."
                (cons (cons nil nil)
                      ew-decode-field-cache-buf)))
        (setcar (car ew-decode-field-cache-buf) key)
-       (setcdr (car ew-decode-field-cache-buf)
-               (ew-decode-field-no-cache
-                field-name field-body))
+       (setcdr (car ew-decode-field-cache-buf) decoded)
        (cdar ew-decode-field-cache-buf)))))
 
 (defun ew-analyze-field-to-decode (field-name field-body)
@@ -593,4 +591,6 @@ each line is separated by CRLF."
   (ew-decode-field-no-cache
      "From" "\"Cl\351ment Brousset\" <cbrousset@staffandline.com>"))
 
+(ew-decode-field-no-cache "From" " \"Jacek \\\"Jaytee\\\" Szyd\263owski\" <jaytee@friko.onet.pl>")
+
 )