(Entity Attributes): Add description about `default-encoding' of

`mime-entity-encoding'.

diff --git a/mime-en.sgml b/mime-en.sgml
index a370fb3..8d0c86e 100644 (file)
--- a/mime-en.sgml
+++ b/mime-en.sgml
@@ -200,10 +200,14 @@ Return file name of <var>entity</var>.
 </defun>
 
 <defun name="mime-entity-encoding">
-           <args> entity
+           <args> entity <opts> default-encoding
 <p>
 Return content-transfer-encoding of <var>entity</var>.
 <cf node="Content-Transfer-Encoding">
+<p>
+If the <var>entity</var> does not have Content-Transfer-Encoding
+field, this function returns <var>default-encoding</var>.  If it is
+nil, <code>"7bit"</code> is used as default value.
 </defun>
 
 <defun name="mime-entity-cooked-p">

diff --git a/mime-ja.sgml b/mime-ja.sgml
index fd27b9a..2a726d5 100644 (file)
--- a/mime-ja.sgml
+++ b/mime-ja.sgml
@@ -204,10 +204,14 @@ node="mime-content-disposition">
 </defun>
 
 <defun name="mime-entity-encoding">
-           <args> entity
+           <args> entity <opts> default-encoding
 <p>
 <var>entity</var> \e$B$N\e(B content-transfer-encoding \e$B$rJV$9!#\e(B<cf
 node="Content-Transfer-Encoding">
+<p>
+\e$B$b$7!"\e(B<var>entity</var> \e$B$K\e(B Content-Transfer-Encoding \e$BMs$,B8:_$7$J$$>l\e(B
+\e$B9g$O!"\e(B<var>default-encoding</var> \e$B$rJV$9!#$3$l$,;XDj$5$l$J$$>l9g$O!"\e(B
+<code>"7bit"</code> \e$B$rMQ$$$k!#\e(B
 </defun>
 
 <defun name="mime-entity-cooked-p">