From 217c92773254540b42d49feef26eff2a236938a8 Mon Sep 17 00:00:00 2001 From: morioka Date: Fri, 19 Jun 1998 22:46:21 +0000 Subject: [PATCH] `mime-entity-point-min', `mime-entity-point-max', `mime-entity-media-type', `mime-entity-media-subtype', `mime-entity-parameters' and `mime-entity-type/subtype' were moved from mime-parse.el. --- mime-def.el | 14 ++++++++++++++ 1 file changed, 14 insertions(+) diff --git a/mime-def.el b/mime-def.el index 357bf00..15f66e4 100644 --- a/mime-def.el +++ b/mime-def.el @@ -199,6 +199,20 @@ (defsubst mime-entity-number (entity) (reverse (mime-entity-node-id entity))) +(defalias 'mime-entity-point-min 'mime-entity-header-start) +(defalias 'mime-entity-point-max 'mime-entity-body-end) + +(defsubst mime-entity-media-type (entity) + (mime-content-type-primary-type (mime-entity-content-type entity))) +(defsubst mime-entity-media-subtype (entity) + (mime-content-type-subtype (mime-entity-content-type entity))) +(defsubst mime-entity-parameters (entity) + (mime-content-type-parameters (mime-entity-content-type entity))) + +(defsubst mime-entity-type/subtype (entity-info) + (mime-type/subtype-string (mime-entity-media-type entity-info) + (mime-entity-media-subtype entity-info))) + ;;; @ utility ;;; -- 1.7.10.4