From dd8581cbad2f48f4a2cb4d0d695f2d90ee607707 Mon Sep 17 00:00:00 2001 From: morioka Date: Sat, 16 May 1998 02:36:48 +0000 Subject: [PATCH] (mime-content-disposition-parameter): New function. (mime-content-disposition-filename): New function. --- mime-parse.el | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/mime-parse.el b/mime-parse.el index c1317e4..0efa86e 100644 --- a/mime-parse.el +++ b/mime-parse.el @@ -160,6 +160,14 @@ and return parsed it." "Return disposition-parameters of CONTENT-DISPOSITION." (cdr content-disposition)) +(defsubst mime-content-disposition-parameter (content-disposition parameter) + "Return PARAMETER value of CONTENT-DISPOSITION." + (cdr (assoc parameter (cdr content-disposition)))) + +(defsubst mime-content-disposition-filename (content-disposition) + "Return filename of CONTENT-DISPOSITION." + (mime-content-disposition-parameter content-disposition "filename")) + ;;; @ Content-Transfer-Encoding ;;; -- 1.7.10.4