(mime-raw-get-original-filename): Use

'mime-content-disposition-parameters.

diff --git a/mime-play.el b/mime-play.el
index cfdcbfd..20991eb 100644 (file)
--- a/mime-play.el
+++ b/mime-play.el
@@ -336,7 +336,10 @@ window.")
   (or (mime-raw-get-uu-filename param encoding)
       (let (ret)
        (or (if (or (and (setq ret (mime-read-Content-Disposition))
-                        (setq ret (assoc "filename" (cdr ret)))
+                        (setq ret
+                              (assoc
+                               "filename"
+                               (mime-content-disposition-parameters ret)))
                         )
                    (setq ret (assoc "name" param))
                    (setq ret (assoc "x-name" param))

diff --git a/mime-view.el b/mime-view.el
index 2f5e96f..8ae704c 100644 (file)
--- a/mime-view.el
+++ b/mime-view.el
@@ -918,7 +918,9 @@ The compressed face will be piped to this command.")
   (or (std11-find-field-body '("Content-Description" "Subject"))
       (let (ret)
        (if (or (and (setq ret (mime-read-Content-Disposition))
-                    (setq ret (assoc "filename" (cdr ret)))
+                    (setq ret
+                          (assoc "filename"
+                                 (mime-content-disposition-parameters ret)))
                     )
                (setq ret (assoc "name" param))
                (setq ret (assoc "x-name" param))