<noindent>\e$B$rI>2A$7$F$/$@$5$$!#\e(B
+<h1> Message \e$B$H\e(B Entity
+<node> Entity
+<p>
+<dref>RFC 2045</dref> \e$B$K$h$l$P!"!V\e(BEntity \e$B$H$$$&8l$O!"\e(Bmessage, \e$B$b$7$/$O!"\e(B
+multipart entity \e$B$N\e(B body \e$BCf$N#1$D$NItJ,$N!"\e(BMIME \e$B$GDj5A$5$l$?\e(B header
+field \e$B$HFbMF$r;X$9!W$H$J$C$F$$$^$9!#$3$3$G$O!"\e(BMIME \e$B$GDj5A$5$l$?\e(B header
+field \e$B0J30$NA4$F$N\e(B header \e$B$H\e(B body \e$B$r;X$98l$H$7$F\e(B
+<concept>entity</concept>\e$B$rMQ$$$k$3$H$K$7$^$9!#\e(B
+<p>
+RFC 2045 \e$B$NDj5A$O!"\e(BMIME message \e$B$,\e(B entity \e$B$rC10L$H$9$kLZ9=B$$G$"$k$3$H$r\e(B
+\e$B<($7$F$$$^$9!#\e(Bmessage \e$B$O2<?^$G<($9$h$&$JLZ$H$J$j!"\e(Bentity \e$B$O$3$NLZ$K$*$1\e(B
+\e$B$k@a$H$J$j$^$9!#$D$^$j!"\e(BMIME \e$B$O\e(B message \e$B$rLZ9=B$$K3HD%$7$?Lu$G$9!#\e(B
+<p>
+FLIM \e$B$O\e(B entity \e$B$N>pJs$rI=8=$9$k$?$a$K\e(B<concept>mime-entity</concept> \e$B9=\e(B
+\e$BB$BN$rMQ$$$^$9!#0J2<$G$OC1$K\e(B mime-entity \e$B$H8F$V$3$H$K$7$^$9!#\e(B
+<p>
+\e$BA0=R$N$h$&$K!"\e(Bmessage \e$BCf$N3F\e(B entity \e$B$OLZ$N@a$KEv$?$j$^$9$,!"$3$NLZ$K$O\e(B
+\e$B?<$5$HF1$8?<$5$NCf$N=gHV$K=>$C$FHV9f$,IU$1$k$3$H$,$G$-$^$9!#B($A!"\e(B
+<verb>
+
+ \e$B(#(!(!(!($\e(B
+ \e$B("\e(B nil \e$B("\e(B
+ \e$B(&(!(((!(%\e(B
+ \e$B(#(!(!(!(!(!(!(!(!(!(+(!(!(!(!(!(!(!(!(!($\e(B
+ \e$B(#(*($\e(B \e$B(#(*($\e(B \e$B(#(*($\e(B
+ \e$B("#0("\e(B \e$B("#1("\e(B \e$B("#2("\e(B
+ \e$B(&(((%\e(B \e$B(&(((%\e(B \e$B(&(((%\e(B
+ \e$B("\e(B \e$B(#(!(!(!(!(+(!(!(!(!($\e(B \e$B("\e(B
+ \e$B(#(!(*(!($(#(!(*(!($(#(!(*(!($(#(!(*(!($(#(!(*(!($\e(B
+ \e$B("\e(B \e$B#0\e(B.\e$B#0("("\e(B \e$B#1\e(B.\e$B#0("("\e(B \e$B#1\e(B.\e$B#1("("\e(B \e$B#1\e(B.\e$B#2("("\e(B \e$B#2\e(B.\e$B#0("\e(B
+ \e$B(&(!(!(!(%(&(!(!(!(%(&(!(!(!(%(&(!(!(!(%(&(!(!(!(%\e(B
+
+</verb>
+<p>
+<noindent>\e$B$N$h$&$K?<$5\e(B n \e$B$N@a$K$OD9$5\e(B n \e$B$N@0?tNs$N@aHV9f$,?6$l$^$9!#$3$l\e(B
+\e$B$r\e(B <concept>entity-number</concept> \e$B$H8F$S$^$9!#\e(Bentity-number \e$B$O\e(B S \e$B<0$H\e(B
+\e$B$7$F$O\e(B <code>(1 2 3)</code> \e$B$N$h$&$J@0?t$N%j%9%H$H$7$FI=8=$5$l$^$9!#\e(B
+<p>
+mime-entity \e$B$G$O!"$3$l$HF1MM$N\e(B <concept>node-id</concept> \e$B$rMQ$$$^$9!#\e(B
+node-id \e$B$O$A$g$&$I\e(B entity-number \e$B$r5U$K$7$?%j%9%H$G!"\e(Bentity-number
+1.2.3 \e$B$KBP1~$9$k\e(B node-id \e$B$O\e(B <code>(3 2 1)</code> \e$B$G$9!#\e(B
+<p>
+\e$BA0=R$N$h$&$K!"\e(BMIME message \e$B$O\e(B entity \e$B$rC10L$H$7$?LZ9=B$$K$J$C$F$$$k$N$G!"\e(B
+\e$B$3$N:,$G$"$k\e(B message \e$BA4BN$b\e(B mime-entity \e$B$GI=8=$9$k$3$H$,$G$-!"\e(Bbuffer
+local \e$BJQ?t\e(B <code>mime-message-structure</code> \e$B$K3JG<$9$k$3$H$K$7$^$9!#\e(B
+\e$B$=$7$F!"\e(Bentity-number \e$B$d\e(B node-id \e$B$rMQ$$$k$3$H$G\e(B
+<code>mime-message-structure</code> \e$B$K$*$1$k\e(B entity \e$B$NAjBPE*$J0LCV4X78$r\e(B
+\e$B07$&$3$H$,$G$-$^$9!#\e(B
+
+
+<h2> mime-entity \e$B9=B$BN\e(B
+<node> mime-entity
+<p>
+<define type="Structure" name="mime-entity">
+<p>
+entity \e$B$K4X$9$k>pJs$r<}$a$k9=B$BN!#\e(B
+<p>
+\e$B$3$N9=B$BN$r;2>H$9$k$K$O\e(B <code>mime-entity-\e$BMWAGL>\e(B</code> \e$B$H$$$&L>A0$N;2\e(B
+\e$B>H4X?t$rMQ$$$k!#\e(B
+<p>
+\e$B$3$N9=B$BN$NMWAG$O0J2<$NDL$j$G$"$k!'\e(B
+
+<vl>
+<dt>buffer<dd>entity \e$B$,B8:_$9$k\e(B buffer (buffer)
+</dd>
+<dt>header-start<dd>entity \e$B$NB8:_$9$k\e(B buffer \e$B$K$*$1$k\e(B header \e$B$N@hF,0LCV\e(B
+(point)
+</dd>
+<dt>header-end<dd>entity \e$B$NB8:_$9$k\e(B buffer \e$B$K$*$1$k\e(B header \e$B$NKvHx0LCV\e(B
+(point)
+</dd>
+<dt>body-start<dd>entity \e$B$NB8:_$9$k\e(B buffer \e$B$K$*$1$k\e(B body \e$B$N@hF,0LCV\e(B
+(point)
+</dd>
+<dt>body-end<dd>entity \e$B$NB8:_$9$k\e(B buffer \e$B$K$*$1$k\e(B body \e$B$NKvHx0LCV\e(B
+(point)
+</dd>
+<dt>node-id<dd>entity \e$B$N\e(B node-id (\e$B@0?t$N\e(B list)
+</dd>
+<dt>content-type<dd><dref>Content-Type</dref> \e$BMs$N>pJs\e(B
+(mime-content-type)
+</dd>
+<dt>content-disposition<dd><dref>Content-Disposition</dref> \e$BMs$N>pJs\e(B
+(mime-content-disposition)
+</dd>
+<dt>encoding<dd>entity \e$B$N\e(B <dref>Content-Transfer-Encoding</dref> (\e$BJ8;zNs\e(B)
+</dd>
+<dt>children<dd>entity \e$B$K4^$^$l$k\e(B entity \e$B$N\e(B list (mime-entity \e$B$N\e(B
+list)
+</dd>
+</vl>
+
+<p>
+\e$B$^$?!"2a5n$H$N8_49@-$N$?$a!"0J2<$NMWAGL>$N;2>H4X?t$bMxMQ2DG=$G$"$k!#\e(B
+
+<vl>
+<dt>type/subtype<dd>entity \e$B$N\e(B type/subtype (\e$BJ8;zNs\e(B)
+</dd>
+<dt>media-type<dd>entity \e$B$N\e(B media-primary-type (symbol)
+</dd>
+<dt>media-subtype<dd>entity \e$B$N\e(B media-subtype (symbol)
+</dd>
+<dt>parameters<dd>entity \e$B$N\e(B Content-Type \e$BMs$N\e(B parameter (\e$BO"A[\e(B list)
+</dd>
+</vl>
+</define>
+
+<defun name="make-mime-entity">
+ <args> buffer header-start header-end body-start body-end
+ <opts> node-id content-type content-disposition encoding
+ children
+<p>
+entity \e$B$N@8@.;R!#\e(B
+</defun>
+
+<defun name="mime-entity-point-min">
+ <args> entity
+<p>
+entity \e$B$NB8:_$9$k\e(B buffer \e$B$K$*$1$k\e(B entity \e$B$N@hF,0LCV$rJV$9!#\e(B
+</defun>
+
+<defun name="mime-entity-point-max">
+ <args> entity
+<p>
+entity \e$B$NB8:_$9$k\e(B buffer \e$B$K$*$1$k\e(B entity \e$B$NKvHx0LCV$rJV$9!#\e(B
+</defun>
+
+
+<h2> Message \e$B$N2r@O4o\e(B
+<node> Message parser
+<p>
+<defun name="mime-parse-message">
+ <opts> default-ctl default-encoding node-id
+<p>
+\e$B8=:_$N\e(B buffer \e$B$r9=J82r@O$7$?7k2L$rJV$9!#\e(B
+</defun>
+
+<defun name="mime-parse-buffer">
+ <opts> buffer
+<p>
+<var>buffer</var> \e$B$r9=J82r@O$7!"$=$N7k2L$r\e(B <var>buffer</var> \e$B$N\e(B
+<code>mime-message-structure</code> \e$B$K3JG<$9$k!#\e(B
+<p>
+<var>buffer</var> \e$B$,>JN,$5$l$?>l9g!"8=:_$N\e(B buffer \e$B$r9=J82r@O$9$k!#\e(B
+</defun>
+
+
+<h2> Entity \e$B$N0LCV4X78$K4X$9$k5!G=\e(B
+<node> Entity as node in message
+<p>
+<defvar name="mime-message-structure">
+<p>
+\e$B8=:_$N\e(B buffer \e$B$K$*$1$k\e(B message \e$BA4BN$N\e(B mime-entity \e$B9=B$BN$r3JG<$9$k\e(B
+buffer local \e$BJQ?t!#\e(B
+</defvar>
+
+<defun name="mime-entity-number">
+ <args> entity
+<p>
+<var>entity</var> \e$B$N\e(B entity-number \e$B$rJV$9!#\e(B
+</defun>
+
+<defun name="mime-entity-parent">
+ <args> entity <opts> message-structure
+<p>
+<var>entity</var> \e$B$N?F$N\e(B entity \e$B$rJV$9!#\e(B
+<p>
+<var>message-structure</var> \e$B$,>JN,$5$l$?>l9g$O\e(B entity \e$B$,B8:_$9$k\e(B
+buffer \e$B$K$*$1$k\e(B <code>mime-message-structure</code> \e$B$NCM$rMQ$$$k!#\e(B
+<p>
+<var>message-structure</var> \e$B$,;XDj$5$l$?>l9g!"$3$l$r:,$H8+Jo$9!#\e(B
+</defun>
+
+<defun name="mime-root-entity-p">
+ <args> entity
+<p>
+<var>entity</var> \e$B$,:,!JB($A!"\e(Bmessage \e$BA4BN!K$G$"$k>l9g$K!"\e(B
+\e$BHs\e(B-<code>nil</code> \e$B$rJV$9!#\e(B
+</defun>
+
+
+<h2> Entity header \e$B$N>pJs\e(B
+<node> Entity-header
+<p>
+<defun name="mime-entity-fetch-field">
+ <args> entity field-name
+<p>
+<var>entity</var> \e$B$N\e(B header \e$BCf$N\e(B <var>field-name</var> \e$BMs$N\e(B body \e$B$rJV$9!#\e(B
+<p>
+\e$B7k2L$NJ8;zNs$O\e(B network \e$BI=8=$N$^$^$G$"$k!#\e(B
+<p>
+<var>field-name</var> \e$BMs$,B8:_$7$J$$>l9g$O\e(B nil \e$B$rJV$9!#\e(B
+</defun>
+
+<defun name="mime-entity-read-field">
+ <args> entity field-name
+<p>
+<var>entity</var> \e$B$N\e(B header \e$BCf$N\e(B <var>field-name</var> \e$BMs$r9=J82r@O$7$?\e(B
+\e$B7k2L$rJV$9!#\e(B
+<p>
+\e$B7k2L$N7A<0$OMsKh$K0[$J$k!#Hs9=B$2=Ms$N>l9g$OJ8;zNs$rJV$7!"9=B$2=Ms$N>l9g\e(B
+\e$B$O$=$N7A<0$K=>$C$?\e(B list \e$B$rJV$9!#\e(B
+<p>
+\e$B7k2LCf$NJ8;zNs$O\e(B Emacs \e$B$NFbItI=8=$KJQ49$5$l$k!#\e(B
+<p>
+<var>field-name</var> \e$BMs$,B8:_$7$J$$>l9g$O\e(B nil \e$B$rJV$9!#\e(B
+</defun>
+
+<defun name="mime-insert-decoded-header">
+ <args> entity <opts> invisible-fields visible-fields
+ code-conversion
+<p>
+\e$B8=:_0LCV$K\e(B <var>entity</var> \e$B$NI|9f$7$?\e(B header \e$B$rA^F~$9$k!#\e(B
+<p>
+<var>invisible-fields</var> \e$B$H\e(B <var>visible-fields</var> \e$B$O@55,I=8=$N\e(B
+list \e$B$G!"$=$l$>$l!"I=<($7$?$/$J$$\e(B field \e$BL>$HI=<($7$?$$MsL>$rI=8=$7$?$b$N\e(B
+\e$B$G$"$k!#\e(B
+<p>
+<var>invisible-fields</var> \e$B$NMWAG$N$I$l$+$K\e(B match \e$B$7!"$+$D!"\e(B
+<var>visible-fields</var> \e$B$NMWAG$N$I$l$K$b\e(B match \e$B$7$J$$Ms$OI=<($5$l$J$$!#\e(B
+</defun>
+
+
+<h2> Entity \e$B$NFbMF\e(B
+<node> Entity-content
+<p>
+<defun name="mime-entity-content">
+ <args> entity
+<p>
+<var>entity</var> \e$B$NFbMF$N\e(B byte \e$BNs$rJV$9!#\e(B
+</defun>
+
+
<h1> Content-Type \e$BMs$N>pJs\e(B
<node> Content-Type
<p>
</defvar>
-<h1> encoded-word
+<h1> Header \e$B$N\e(B network \e$BI=8=\e(B
<node> encoded-word
<p>
encoded-word \e$B$O\e(B header \e$B$GHs\e(B <dref>ASCII</dref> \e$BJ8;z$rI=8=$9$k$?$a$N7A\e(B
-<h1> Message \e$B$H\e(B Entity
-<node> Entity structure
-<p>
-MIME message \e$B$O\e(B <concept>entity</concept> \e$B$rC10L$H$9$kLZ9=B$$G$9!#\e(B
-<concept>mime-entity</concept> \e$B9=B$BN$O\e(B entity \e$B$d\e(B message \e$BA4BN$N>pJs$r3J\e(B
-\e$BG<$9$k9=B$BN$G!"0J2<$G$OC1$K\e(B mime-entity \e$B$H8F$V$3$H$K$7$^$9!#\e(B
-<p>
-message \e$BCf$N3F\e(B entity \e$B$OLZ$N@a$KEv$?$j$^$9$,!"$3$NLZ$K$O?<$5$HF1$8?<$5$N\e(B
-\e$BCf$N=gHV$K=>$C$FHV9f$,IU$1$k$3$H$,$G$-$^$9!#B($A!"\e(B
-<verb>
-
- \e$B(#(!(!(!($\e(B
- \e$B("\e(B nil \e$B("\e(B
- \e$B(&(!(((!(%\e(B
- \e$B(#(!(!(!(!(!(!(!(!(!(+(!(!(!(!(!(!(!(!(!($\e(B
- \e$B(#(*($\e(B \e$B(#(*($\e(B \e$B(#(*($\e(B
- \e$B("#0("\e(B \e$B("#1("\e(B \e$B("#2("\e(B
- \e$B(&(((%\e(B \e$B(&(((%\e(B \e$B(&(((%\e(B
- \e$B("\e(B \e$B(#(!(!(!(!(+(!(!(!(!($\e(B \e$B("\e(B
- \e$B(#(!(*(!($(#(!(*(!($(#(!(*(!($(#(!(*(!($(#(!(*(!($\e(B
- \e$B("\e(B \e$B#0\e(B.\e$B#0("("\e(B \e$B#1\e(B.\e$B#0("("\e(B \e$B#1\e(B.\e$B#1("("\e(B \e$B#1\e(B.\e$B#2("("\e(B \e$B#2\e(B.\e$B#0("\e(B
- \e$B(&(!(!(!(%(&(!(!(!(%(&(!(!(!(%(&(!(!(!(%(&(!(!(!(%\e(B
-
-</verb>
-<p>
-<noindent>\e$B$N$h$&$K?<$5\e(B n \e$B$N@a$K$OD9$5\e(B n \e$B$N@0?tNs$N@aHV9f$,?6$l$^$9!#$3$l\e(B
-\e$B$r\e(B <concept>entity-number</concept> \e$B$H8F$S$^$9!#\e(Bentity-number \e$B$O\e(B S \e$B<0$H\e(B
-\e$B$7$F$O\e(B <code>(1 2 3)</code> \e$B$N$h$&$J@0?t$N%j%9%H$H$7$FI=8=$5$l$^$9!#\e(B
-<p>
-mime-entity \e$B$G$O!"$3$l$HF1MM$N\e(B <concept>node-id</concept> \e$B$rMQ$$$^$9!#\e(B
-node-id \e$B$O$A$g$&$I\e(B entity-number \e$B$r5U$K$7$?%j%9%H$G!"\e(Bentity-number
-1.2.3 \e$B$KBP1~$9$k\e(B node-id \e$B$O\e(B <code>(3 2 1)</code> \e$B$G$9!#\e(B
-<p>
-\e$BA0=R$N$h$&$K!"\e(BMIME message \e$B$O\e(B entity \e$B$rC10L$H$7$?LZ9=B$$K$J$C$F$$$^$9$,!"\e(B
-\e$B$3$N:,$G$"$k\e(B message \e$BA4BN$b\e(B mime-entity \e$B$GI=8=$9$k$3$H$,$G$-!"\e(Bbuffer
-local \e$BJQ?t\e(B <code>mime-message-structure</code> \e$B$K3JG<$9$k$3$H$K$7$^$9!#\e(B
-\e$B$=$7$F!"\e(Bentity-number \e$B$d\e(B node-id \e$B$rMQ$$$k$3$H$G\e(B
-<code>mime-message-structure</code> \e$B$K$*$1$k\e(B entity \e$B$NAjBPE*$J0LCV4X78$r\e(B
-\e$B07$&$3$H$,$G$-$^$9!#\e(B
-
-
-<h2> mime-entity \e$B9=B$BN\e(B
-<node> mime-entity
-<p>
-<define type="Structure" name="mime-entity">
-<p>
-entity \e$B$K4X$9$k>pJs$r<}$a$k9=B$BN!#\e(B
-<p>
-\e$B$3$N9=B$BN$r;2>H$9$k$K$O\e(B <code>mime-entity-\e$BMWAGL>\e(B</code> \e$B$H$$$&L>A0$N;2\e(B
-\e$B>H4X?t$rMQ$$$k!#\e(B
-<p>
-\e$B$3$N9=B$BN$NMWAG$O0J2<$NDL$j$G$"$k!'\e(B
-
-<vl>
-<dt>buffer<dd>entity \e$B$,B8:_$9$k\e(B buffer (buffer)
-</dd>
-<dt>header-start<dd>entity \e$B$NB8:_$9$k\e(B buffer \e$B$K$*$1$k\e(B header \e$B$N@hF,0LCV\e(B
-(point)
-</dd>
-<dt>header-end<dd>entity \e$B$NB8:_$9$k\e(B buffer \e$B$K$*$1$k\e(B header \e$B$NKvHx0LCV\e(B
-(point)
-</dd>
-<dt>body-start<dd>entity \e$B$NB8:_$9$k\e(B buffer \e$B$K$*$1$k\e(B body \e$B$N@hF,0LCV\e(B
-(point)
-</dd>
-<dt>body-end<dd>entity \e$B$NB8:_$9$k\e(B buffer \e$B$K$*$1$k\e(B body \e$B$NKvHx0LCV\e(B
-(point)
-</dd>
-<dt>node-id<dd>entity \e$B$N\e(B node-id (\e$B@0?t$N\e(B list)
-</dd>
-<dt>content-type<dd>Content-Type \e$BMs$N>pJs\e(B (mime-content-type)
-</dd>
-<dt>content-disposition<dd>Content-Disposition \e$BMs$N>pJs\e(B
-(mime-content-disposition)
-</dd>
-<dt>encoding<dd>entity \e$B$N\e(B Content-Transfer-Encoding (\e$BJ8;zNs\e(B)
-</dd>
-<dt>children<dd>entity \e$B$K4^$^$l$k\e(B entity \e$B$N\e(B list (mime-entity \e$B$N\e(B
-list)
-</dd>
-</vl>
-
-<p>
-\e$B$^$?!"2a5n$H$N8_49@-$N$?$a!"0J2<$NMWAGL>$N;2>H4X?t$bMxMQ2DG=$G$"$k!#\e(B
-
-<vl>
-<dt>point-min<dd>entity \e$B$NB8:_$9$k\e(B buffer \e$B$K$*$1$k\e(B entity \e$B$N@hF,0LCV\e(B
-(point)
-</dd>
-<dt>point-max<dd>entity \e$B$NB8:_$9$k\e(B buffer \e$B$K$*$1$k\e(B entity \e$B$NKvHx0LCV\e(B
-(point)
-</dd>
-<dt>type/subtype<dd>entity \e$B$N\e(B type/subtype (\e$BJ8;zNs\e(B)
-</dd>
-<dt>media-type<dd>entity \e$B$N\e(B media-primary-type (symbol)
-</dd>
-<dt>media-subtype<dd>entity \e$B$N\e(B media-subtype (symbol)
-</dd>
-<dt>parameters<dd>entity \e$B$N\e(B Content-Type \e$BMs$N\e(B parameter (\e$BO"A[\e(B list)
-list)
-</dd>
-</vl>
-</define>
-
-<defun name="make-mime-entity">
- <args> buffer header-start header-end body-start body-end
- <opts> node-id content-type content-disposition encoding
- children
-<p>
-entity \e$B$N@8@.;R!#\e(B
-</defun>
-
-
-<h2> Message \e$B$N2r@O4o\e(B
-<node> Message parser
-<p>
-<defvar name="mime-message-structure">
-<p>
-\e$B8=:_$N\e(B buffer \e$B$K$*$1$k\e(B message \e$BA4BN$N\e(B mime-entity \e$B9=B$BN$r3JG<$9$k\e(B
-buffer local \e$BJQ?t!#\e(B
-</defvar>
-
-<defun name="mime-parse-message">
- <opts> default-ctl default-encoding node-id
-<p>
-\e$B8=:_$N\e(B buffer \e$B$r9=J82r@O$7$?7k2L$rJV$9!#\e(B
-</defun>
-
-<defun name="mime-parse-buffer">
- <opts> buffer
-<p>
-<var>buffer</var> \e$B$r9=J82r@O$7!"$=$N7k2L$r\e(B <var>buffer</var> \e$B$N\e(B
-<code>mime-message-structure</code> \e$B$K3JG<$9$k!#\e(B
-<p>
-<var>buffer</var> \e$B$,>JN,$5$l$?>l9g!"8=:_$N\e(B buffer \e$B$r9=J82r@O$9$k!#\e(B
-</defun>
-
-
-<h2> Entity \e$B$N0LCV4X78$K4X$9$k5!G=\e(B
-<node> Entity as node in message
-<p>
-<defun name="mime-entity-number">
- <args> entity
-<p>
-<var>entity</var> \e$B$N\e(B entity-number \e$B$rJV$9!#\e(B
-</defun>
-
-<defun name="mime-entity-parent">
- <args> entity <opts> message-structure
-<p>
-<var>entity</var> \e$B$N?F$N\e(B entity \e$B$rJV$9!#\e(B
-<p>
-<var>message-structure</var> \e$B$,>JN,$5$l$?>l9g$O\e(B entity \e$B$,B8:_$9$k\e(B
-buffer \e$B$K$*$1$k\e(B <code>mime-message-structure</code> \e$B$NCM$rMQ$$$k!#\e(B
-<p>
-<var>message-structure</var> \e$B$,;XDj$5$l$?>l9g!"$3$l$r:,$H8+Jo$9!#\e(B
-</defun>
-
-<defun name="mime-root-entity-p">
- <args> entity
-<p>
-<var>entity</var> \e$B$,:,!JB($A!"\e(Bmessage \e$BA4BN!K$G$"$k>l9g$K!"\e(B
-\e$BHs\e(B-<code>nil</code> \e$B$rJV$9!#\e(B
-</defun>
-
-
-<h2> Entity header \e$B$N>pJs\e(B
-<node> Entity-header
-<p>
-<defun name="mime-entity-fetch-field">
- <args> entity field-name
-<p>
-<var>entity</var> \e$B$N\e(B header \e$BCf$N\e(B <var>field-name</var> \e$BMs$N\e(B body \e$B$rJV$9!#\e(B
-<p>
-\e$B7k2L$NJ8;zNs$O\e(B network \e$BI=8=$N$^$^$G$"$k!#\e(B
-<p>
-<var>field-name</var> \e$BMs$,B8:_$7$J$$>l9g$O\e(B nil \e$B$rJV$9!#\e(B
-</defun>
-
-<defun name="mime-entity-read-field">
- <args> entity field-name
-<p>
-<var>entity</var> \e$B$N\e(B header \e$BCf$N\e(B <var>field-name</var> \e$BMs$r9=J82r@O$7$?\e(B
-\e$B7k2L$rJV$9!#\e(B
-<p>
-\e$B7k2L$N7A<0$OMsKh$K0[$J$k!#Hs9=B$2=Ms$N>l9g$OJ8;zNs$rJV$7!"9=B$2=Ms$N>l9g\e(B
-\e$B$O$=$N7A<0$K=>$C$?\e(B list \e$B$rJV$9!#\e(B
-<p>
-\e$B7k2LCf$NJ8;zNs$O\e(B Emacs \e$B$NFbItI=8=$KJQ49$5$l$k!#\e(B
-<p>
-<var>field-name</var> \e$BMs$,B8:_$7$J$$>l9g$O\e(B nil \e$B$rJV$9!#\e(B
-</defun>
-
-<defun name="mime-insert-decoded-header">
- <args> entity <opts> invisible-fields visible-fields
- code-conversion
-<p>
-\e$B8=:_0LCV$K\e(B <var>entity</var> \e$B$NI|9f$7$?\e(B header \e$B$rA^F~$9$k!#\e(B
-<p>
-<var>invisible-fields</var> \e$B$H\e(B <var>visible-fields</var> \e$B$O@55,I=8=$N\e(B
-list \e$B$G!"$=$l$>$l!"I=<($7$?$/$J$$\e(B field \e$BL>$HI=<($7$?$$MsL>$rI=8=$7$?$b$N\e(B
-\e$B$G$"$k!#\e(B
-<p>
-<var>invisible-fields</var> \e$B$NMWAG$N$I$l$+$K\e(B match \e$B$7!"$+$D!"\e(B
-<var>visible-fields</var> \e$B$NMWAG$N$I$l$K$b\e(B match \e$B$7$J$$Ms$OI=<($5$l$J$$!#\e(B
-</defun>
-
-
-<h2> Entity \e$B$NFbMF\e(B
-<node> Entity-content
-<p>
-<defun name="mime-entity-content">
- <args> entity
-<p>
-<var>entity</var> \e$B$NFbMF$N\e(B byte \e$BNs$rJV$9!#\e(B
-</defun>
-
-
<h1> \e$BIUO?\e(B
<node> Appendix
data \e$B$r;X$9$3$H$,$"$k!#\e(B
-<h3> Entity
-<node> entity
-<p>
-\e$B$"$k\e(B message \e$B$b$7$/$O\e(B multipart message \e$B$N#1$D$N\e(B part \e$B$N\e(B header \e$B$H\e(B
-body \e$B$rJ;$;$?$b$N!#\e(B
-
-
<h3> media-type
<node> media-type
<p>