From: morioka Date: Wed, 24 Jun 1998 11:08:15 +0000 (+0000) Subject: (mime-entity-set-children): New function. X-Git-Tag: chao-1_6_0-199811302358~2 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=2be1500f807b2b0a340886f4d61023b95f9dd938;p=elisp%2Fflim.git (mime-entity-set-children): New function. --- diff --git a/mime-def.el b/mime-def.el index 3611b08..f0a9d36 100644 --- a/mime-def.el +++ b/mime-def.el @@ -24,7 +24,7 @@ ;;; Code: -(defconst mime-library-version-string "FLIM 1.6.0 - \"Ogura\"") +(defconst mime-library-version-string "Chao 1.6.0 - \"Kuj,Dr(B\"") ;;; @ variables @@ -205,7 +205,9 @@ (defsubst mime-entity-parsed-header (entity) (aref entity 11)) (defsubst mime-entity-set-original-header (entity header) - (aset entity 9 header)) + (aset entity 9 header)) +(defsubst mime-entity-set-children (entity children) + (aset entity 10 children)) (defsubst mime-entity-set-parsed-header (entity header) (aset entity 11 header))