From fb8019728f407b0dd19e198421d9d1c1531fee18 Mon Sep 17 00:00:00 2001
From: morioka <morioka>
Date: Sat, 17 Oct 1998 13:27:59 +0000
Subject: [PATCH] (entity formatting): New node; move `mime-insert-header'
 from `Entity-header'; move `default-mime-charset' from
 `custom'.

---
 mime-en.sgml |   25 +++++++++++++++++--------
 mime-ja.sgml |   26 +++++++++++++++++---------
 2 files changed, 34 insertions(+), 17 deletions(-)

diff --git a/mime-en.sgml b/mime-en.sgml
index f4c0ea4..b45dacc 100644
--- a/mime-en.sgml
+++ b/mime-en.sgml
@@ -264,6 +264,10 @@ If <var>field-name</var> field is not found, this function returns
 <code>nil</code>.
 </defun>
 
+
+<h2> Text presentation of entity
+<node> entity formatting
+<p>
 <defun name="mime-insert-header">
 	    <args> entity <opts> invisible-fields visible-fields
 <p>
@@ -276,8 +280,21 @@ field-name to hide.
 If a field-name is matched with some elements of
 <var>invisible-fields</var> and matched with none of
 <var>visible-fields</var>, this function don't insert the field.
+<p>
+Each <dref>encoded-word</dref> in the header is decoded.  ``Raw non
+us-ascii characters'' are also decoded as
+<var>default-mime-charset</var>.
 </defun>
 
+<defvar name="default-mime-charset">
+<p>
+Symbol to indicate default value of <dref>MIME-charset</dref>.
+<p>
+It is used when MIME-charset is not specified.
+<p>
+It is originally variable of APEL.
+</defvar>
+
 
 <h2> Contents of Entity
 <node> Entity-content
@@ -857,14 +874,6 @@ MIME $B4XO"5!G=$K4X$9$k(B group.
 <code>mail</code> $B$H(B <code>news</code> $B$KB0$9$k!#(B
 </define>
 
-<defvar name="default-mime-charset">
-<p>
-$BE,@Z$J(B <dref>MIME charset</dref> $B$,8+$D$+$i$J$+$C$?>l9g$KMQ$$$i$l$k(B
-MIME charset.
-<p>
-$BK\Mh$O(B APEL $B$NJQ?t$G$"$k!#(B
-</defvar>
-
 <defvar name="mime-temp-directory">
 <p>
 MIME $B5!G=$K4X$9$k<BAu$,0l;~E*$K;HMQ$9$k(B file $B$r:n@.$9$k(B directory.
diff --git a/mime-ja.sgml b/mime-ja.sgml
index d6d0600..3397b86 100644
--- a/mime-ja.sgml
+++ b/mime-ja.sgml
@@ -263,6 +263,10 @@ code-converted.
 <var>field-name</var> $BMs$,B8:_$7$J$$>l9g$O(B nil $B$rJV$9!#(B
 </defun>
 
+
+<h2> Entity $B$NJ8;zI=8=(B
+<node> entity formatting
+<p>
 <defun name="mime-insert-header">
 	    <args> entity <opts> invisible-fields visible-fields
 <p>
@@ -273,9 +277,21 @@ list $B$G!"$=$l$>$l!"I=<($7$?$/$J$$(B field $BL>$HI=<($7$?$$MsL>$rI=8=$7$?$b$
 $B$G$"$k!#(B
 <p>
 <var>invisible-fields</var> $B$NMWAG$N$I$l$+$K(B match $B$7!"$+$D!"(B
-<var>visible-fields</var> $B$NMWAG$N$I$l$K$b(B match $B$7$J$$Ms$OI=<($5$l$J$$!#(B
+<var>visible-fields</var> $B$NMWAG$N$I$l$K$b(B match $B$7$J$$Ms$OI=<($5$l$J(B
+$B$$!#(B
+<p>
+<dref>encoded-word</dref> $B$OI|9f$5$l$k!#!X@8$NHs(B us-ascii $BJ8;z!Y$O(B 
+<var>default-mime-charset</var> $B$H$7$F2r<a$5$l$k!#(B
 </defun>
 
+<defvar name="default-mime-charset">
+<p>
+$BE,@Z$J(B <dref>MIME charset</dref> $B$,8+$D$+$i$J$+$C$?>l9g$KMQ$$$i$l$k(B
+MIME charset.
+<p>
+$BK\Mh$O(B APEL $B$NJQ?t$G$"$k!#(B
+</defvar>
+
 
 <h2> Entity $B$NFbMF(B
 <node> Entity-content
@@ -853,14 +869,6 @@ MIME $B4XO"5!G=$K4X$9$k(B group.
 <code>mail</code> $B$H(B <code>news</code> $B$KB0$9$k!#(B
 </define>
 
-<defvar name="default-mime-charset">
-<p>
-$BE,@Z$J(B <dref>MIME charset</dref> $B$,8+$D$+$i$J$+$C$?>l9g$KMQ$$$i$l$k(B
-MIME charset.
-<p>
-$BK\Mh$O(B APEL $B$NJQ?t$G$"$k!#(B
-</defvar>
-
 <defvar name="mime-temp-directory">
 <p>
 MIME $B5!G=$K4X$9$k<BAu$,0l;~E*$K;HMQ$9$k(B file $B$r:n@.$9$k(B directory.
-- 
1.7.10.4