(mime-entity-safe-filename): Use `mime-read-field' instead of

`mime-entity-read-field'.

diff --git a/mime-play.el b/mime-play.el
index ee41aba..d2e2f61 100644 (file)
--- a/mime-play.el
+++ b/mime-play.el
@@ -298,8 +298,8 @@ window.")
   (let ((filename
         (or (mime-entity-filename entity)
             (let ((subj
-                   (or (mime-entity-read-field entity 'Content-Description)
-                       (mime-entity-read-field entity 'Subject))))
+                   (or (mime-read-field 'Content-Description entity)
+                       (mime-read-field 'Subject entity))))
               (if (and subj
                        (or (string-match mime-view-file-name-regexp-1 subj)
                            (string-match mime-view-file-name-regexp-2 subj)))

diff --git a/mime-view.el b/mime-view.el
index bba8aed..32ff988 100644 (file)
--- a/mime-view.el
+++ b/mime-view.el
@@ -251,8 +251,8 @@ If optional argument MESSAGE-INFO is not specified,
             ))))
 
 (defun mime-view-entity-title (entity)
-  (or (mime-entity-read-field entity 'Content-Description)
-      (mime-entity-read-field entity 'Subject)
+  (or (mime-read-field 'Content-Description entity)
+      (mime-read-field 'Subject entity)
       (mime-entity-filename entity)
       ""))