From b6377f4fd418f38718c6cdfea81159cda67e289c Mon Sep 17 00:00:00 2001
From: morioka <morioka>
Date: Sat, 4 Jul 1998 12:03:26 +0000
Subject: [PATCH] (Entity Attributes): Add description about
 `default-encoding' of `mime-entity-encoding'.

---
 mime-en.sgml |    6 +++++-
 mime-ja.sgml |    6 +++++-
 2 files changed, 10 insertions(+), 2 deletions(-)

diff --git a/mime-en.sgml b/mime-en.sgml
index a370fb3..8d0c86e 100644
--- 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
--- 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> の content-transfer-encoding を返す。<cf
 node="Content-Transfer-Encoding">
+<p>
+もし、<var>entity</var> に Content-Transfer-Encoding 欄が存在しない場
+合は、<var>default-encoding</var> を返す。これが指定されない場合は、
+<code>"7bit"</code> を用いる。
 </defun>
 
 <defun name="mime-entity-cooked-p">
-- 
1.7.10.4