From: akr <akr>
Date: Tue, 1 Sep 1998 13:15:48 +0000 (+0000)
Subject: * TESTPAT: Add a notice about null encoded-text.
X-Git-Tag: doodle-1_9_3~7
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=959ced429adc54c6b0121bf850fe7423217b6a0c;p=elisp%2Fflim.git

* TESTPAT: Add a notice about null encoded-text.

* ew-dec.el (ew-decode-field-test): Reorder options.
---

diff --git a/ChangeLog b/ChangeLog
index d6d091f..497fb2b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,11 @@
 1998-09-01  Tanaka Akira      <akr@jaist.ac.jp>
 
+	* TESTPAT: Add a notice about null encoded-text.
+
+	* ew-dec.el (ew-decode-field-test): Reorder options.
+
+1998-09-01  Tanaka Akira      <akr@jaist.ac.jp>
+
 	* TESTPAT: Add 16 tests.
 
 	* ew-data.el (ew-separate-eword): Check
diff --git a/TESTPAT b/TESTPAT
index 25d8305..cc51ee6 100644
--- a/TESTPAT
+++ b/TESTPAT
@@ -1282,9 +1282,10 @@
 ;;
 ;; NOTE: RFC2047 では encoded-word が空白で区切られなければならないとか、
 ;;  encoded-word は 75bytes 以下でなければならないとか、
-;;  encoded-word が含まれる行は 76bytes 以下でなければならないなどという
+;;  encoded-word が含まれる行は 76bytes 以下でなければならないとか、
+;;  encoded-text が 1byte 以上なければならないなどという
 ;;  規約があるが、embedded-encoded-word 表現ではそれらは採用しない。
-;;  単純に encoded-word 内部の文法だけを利用する。
+;;  単純に encoded-word 内部の文法だけを(修正して)利用する。
 ;;  (本質的には異なる文法を採用することも可能であるが、RFC2047 に敬意を
 ;;  表して encoded-word の文法を採用する。)
 ;;
@@ -1293,6 +1294,7 @@
 ;;  それぞれその文字列そのものを表現するが、それらを連結した文字列
 ;;  =?+US-ASCII?Q?abcd?= は abcd という文字列を表現することになり、
 ;;  それぞれの内容の連結とはならない。
+;;  この場合、=?+++US-ASCII?Q?abcd?= としなければならない。
 ;;
 ;;  これはとくに Non ASCII 拡張 RFC822 の中に embedded-encoded-word 表現を
 ;;  埋め込むときに気を付けなければならない。(埋め込んだ結果は正しい
diff --git a/ew-dec.el b/ew-dec.el
index 4992506..f8820cb 100644
--- a/ew-dec.el
+++ b/ew-dec.el
@@ -496,9 +496,9 @@ each line is separated by CRLF."
 	       ew-ignore-75bytes-limit
 	       ew-permit-sticked-special
 	       ew-permit-sticked-comment
-	       ew-permit-null-encoded-text
 	       ew-decode-sticked-encoded-word
 	       ew-decode-quoted-encoded-word
+	       ew-permit-null-encoded-text
 	       ))
 	    d1 d2)
 	(setq d1 (ew-decode-field-no-cache field-name field-body))
@@ -544,4 +544,8 @@ each line is separated by CRLF."
 (ew-decode-field "To" "\"A\\BC\" <foo@bar>")
 (ew-decode-field "To" "\"\e\\$\\B\\$\\\"\e\\(\\B\" <foo@bar>")
 
+(ew-decode-field-test "Subject" " =?US-ASCII?Q??=?US-ASCII?Q?a?=")
+(ew-decode-field-test "Subject" " =?xUS-ASCII?Q??=?xUS-ASCII?Q?a?=")
+(ew-decode-field-test "Subject" " =?+US-ASCII?Q??=?+US-ASCII?Q?a?=")
+
 )