From 09034c3d6f16a1ff420b7c6db2315bd4fe106d7a Mon Sep 17 00:00:00 2001
From: morioka <morioka>
Date: Thu, 28 May 1998 17:11:32 +0000
Subject: [PATCH] (mime-parse-multipart): Use 'mime-content-type-parameter.

---
 mime-parse.el |    3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/mime-parse.el b/mime-parse.el
index 3a6ac0a..3eb5a8f 100644
--- a/mime-parse.el
+++ b/mime-parse.el
@@ -210,8 +210,7 @@ If is is not found, return DEFAULT-ENCODING."
   (let* ((dash-boundary
 	  (concat "--"
 		  (std11-strip-quoted-string
-		   (cdr (assoc "boundary"
-			       (mime-content-type-parameters content-type))))))
+		   (mime-content-type-parameter content-type "boundary"))))
 	 (delimiter       (concat "\n" (regexp-quote dash-boundary)))
 	 (close-delimiter (concat delimiter "--[ \t]*$"))
 	 (beg (point-min))
-- 
1.7.10.4