From: shuhei <shuhei>
Date: Sun, 22 Apr 2001 02:27:00 +0000 (+0000)
Subject: (mime-content-type-parameter): Expand `mime-content-type-parameters'.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=37355b05017affda7049594f33e2f95f0012578b;p=elisp%2Fflim.git

(mime-content-type-parameter): Expand `mime-content-type-parameters'.
---

diff --git a/mime-def.el b/mime-def.el
index 6177341..a77f014 100644
--- a/mime-def.el
+++ b/mime-def.el
@@ -207,7 +207,7 @@ If method is nil, this field will not be encoded."
 
 (defsubst mime-content-type-parameter (content-type parameter)
   "Return PARAMETER value of CONTENT-TYPE."
-  (cdr (assoc parameter (mime-content-type-parameters content-type))))
+  (cdr (assoc parameter (cdr (cdr content-type)))))
 
 
 (defsubst mime-type/subtype-string (type &optional subtype)