From: morioka <morioka>
Date: Tue, 16 Jun 1998 16:15:48 +0000 (+0000)
Subject: Move definition of structure `mime-entity' to FLIM layer.
X-Git-Tag: remi-199811302358~67
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=f10f0c3b83141bcc18785031da9b2f681fa3f62b;p=elisp%2Fsemi.git

Move definition of structure `mime-entity' to FLIM layer.
---

diff --git a/mime-parse.el b/mime-parse.el
index f9757d1..2749e6a 100644
--- a/mime-parse.el
+++ b/mime-parse.el
@@ -180,25 +180,6 @@ If is is not found, return DEFAULT-ENCODING."
 ;;; @ message parser
 ;;;
 
-(defsubst make-mime-entity (buffer
-			    header-start header-end body-start body-end
-			    &optional node-id
-			    content-type content-disposition
-			    encoding children)
-  (vector buffer header-start header-end body-start body-end
-	  node-id content-type content-disposition encoding children))
-
-(defsubst mime-entity-buffer (entity)              (aref entity 0))
-(defsubst mime-entity-header-start (entity)        (aref entity 1))
-(defsubst mime-entity-header-end (entity)          (aref entity 2))
-(defsubst mime-entity-body-start (entity)          (aref entity 3))
-(defsubst mime-entity-body-end (entity)            (aref entity 4))
-(defsubst mime-entity-node-id (entity)             (aref entity 5))
-(defsubst mime-entity-content-type (entity)        (aref entity 6))
-(defsubst mime-entity-content-disposition (entity) (aref entity 7))
-(defsubst mime-entity-encoding (entity)            (aref entity 8))
-(defsubst mime-entity-children (entity)            (aref entity 9))
-
 (defsubst mime-entity-number (entity)
   (reverse (mime-entity-node-id entity)))