From: morioka Date: Wed, 26 May 1999 09:29:10 +0000 (+0000) Subject: rearrangement. X-Git-Tag: chao-1_13_0~13 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=b65b056b228d38d02b0d67974e155d2f0c478e2a;p=elisp%2Fflim.git rearrangement. --- diff --git a/mime-def.el b/mime-def.el index 571558b..8b03605 100644 --- a/mime-def.el +++ b/mime-def.el @@ -225,30 +225,6 @@ (luna-define-internal-accessors 'mime-entity) -;;; @ message structure -;;; - -(defvar mime-message-structure nil - "Information about structure of message. -Please use reference function `mime-entity-SLOT' to get value of SLOT. - -Following is a list of slots of the structure: - -node-id node-id (list of integers) -content-type content-type (content-type) -content-disposition content-disposition (content-disposition) -encoding Content-Transfer-Encoding (string or nil) -children entities included in this entity (list of entity) - -If an entity includes other entities in its body, such as multipart or -message/rfc822, `mime-entity' structures of them are included in -`children', so the `mime-entity' structure become a tree.") - -(make-variable-buffer-local 'mime-message-structure) - -(make-obsolete-variable 'mime-message-structure "should not use it.") - - ;;; @ for mm-backend ;;; @@ -297,6 +273,30 @@ message/rfc822, `mime-entity' structures of them are included in ) +;;; @ message structure +;;; + +(defvar mime-message-structure nil + "Information about structure of message. +Please use reference function `mime-entity-SLOT' to get value of SLOT. + +Following is a list of slots of the structure: + +node-id node-id (list of integers) +content-type content-type (content-type) +content-disposition content-disposition (content-disposition) +encoding Content-Transfer-Encoding (string or nil) +children entities included in this entity (list of entity) + +If an entity includes other entities in its body, such as multipart or +message/rfc822, `mime-entity' structures of them are included in +`children', so the `mime-entity' structure become a tree.") + +(make-variable-buffer-local 'mime-message-structure) + +(make-obsolete-variable 'mime-message-structure "should not use it.") + + ;;; @ for mel-backend ;;;