From 66389f397ec01b65d9586c4ae15bc14f76b3475d Mon Sep 17 00:00:00 2001 From: morioka Date: Mon, 11 May 1998 17:45:04 +0000 Subject: [PATCH] (mime-content-disposition-type): New function. (mime-content-disposition-parameters): New function. --- mime-parse.el | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/mime-parse.el b/mime-parse.el index 2ccd24c..c2316db 100644 --- a/mime-parse.el +++ b/mime-parse.el @@ -146,6 +146,14 @@ and return parsed it." (mime-parse-Content-Disposition str) ))) +(defsubst mime-content-disposition-type (content-disposition) + "Return disposition-type of CONTENT-DISPOSITION." + (cdr (car content-type))) + +(defsubst mime-content-disposition-parameters (content-disposition) + "Return disposition-parameters of CONTENT-DISPOSITION." + (cdr (cdr content-type))) + ;;; @ Content-Transfer-Encoding ;;; -- 1.7.10.4