[Mew-dist 07471] Re: 1.94b6

[Shun-ichi GOTO]

後藤＠太陽計測です

>>>>> at Mon, 15 Feb 1999 20:25:47 +0900, kazz <kazu at example.com> said,

kazz> (1) RFC2231 の MIME parameter extensions をサポートしました。これで、
kazz> Content-Disposition: の filename パラメータに日本語などを格納できます。

ここ(RFC-2231サポート)に来て発覚したのですが、draftにてマルチパートメー
ル編集操作の不具合を１つ発見。

例えば2つの添付ファイルを送る場合で、１つのファイルは漢字(iso-2022-jp)、
1つのファイルはラテン語(iso-8859-1)なんて場合に、C-c C-mしてから C-c
C-u すると、draftバッファ中の一方の(後のパートの)ファイル名が化けます。

添付のパッチのようにしてみましたところ、正しく復元(C-c C-u)できるよう
になりました。

＃coding-systemとしてはmew-cs-draftを使用しています。
＃いいのかな？ これで。
＃永続的ファイルではないこともあるので、mew-cs-noconvでも
＃いいような気もしますし、ctextでもいいのでしょうね、きっと。
＃codingの勉強不足のため、何が適切かはよくわかんないんです。(^^;



kazz> もう少し分かりやすく言うと、日本語のファイル名を持つファイルを安全に添
kazz> 付できます。

上記問題以外では、何度かnon-asciiファイル名での送受信をしてうまくいく
のを確認しました。

＃相手がいないので、全てMew-to-Mewですが。
＃RFC-2231サポートをしているMUAは他にあるんでしたっけ？ 



P.S.

kazz> これに伴い、内部関数の仕様を一部変更しました。contrib の下のファイルは、
kazz> 気づいた箇所を変更しておきましたが、動くのか試していません。ごめんなさ
kazz> い。

本題とは関係ありませんが、mew-fake-cdp.el 利用者の方へ。

syntax の CT:やCDP:の格納構造が変わったので、従来のmew-fake-cdp.elと
mew-1.94b6の組み合わせはうまく動作しません。 新版(rev.1.11)をどうぞ。

http://www.imasy.or.jp/~gotoh/lisp/mew-fake-cdp.el

＃RFC-2231の実装と競合はしていないようです :-)

--- Regards,
 Shun-ichi Goto  <gotoh at example.com>
   R&D Group, TAIYO Corp., Tokyo, JAPAN



-------------- next part --------------
--- mew-encode.el.orig	Tue Feb 16 06:24:37 1999
+++ mew-encode.el	Tue Feb 16 11:46:21 1999
@@ -114,7 +114,9 @@
 	  (mew-erase-buffer)
 	  (prin1 syntax (current-buffer)) ;; different buffer, so use syntax
 	  (terpri (current-buffer))
-	  (save-buffer)
+	  (mew-frwlet
+	   mew-cs-noconv mew-cs-draft
+	   (save-buffer))
 	  (message "") ;; flush echo area
 	  (kill-buffer (current-buffer))))))
 
--- mew-draft.el.orig	Tue Feb 16 06:24:37 1999
+++ mew-draft.el	Tue Feb 16 11:46:02 1999
@@ -1049,7 +1049,9 @@
       (if (not (file-exists-p syntax-file))
 	  () ;; single
 	(save-excursion
-	  (find-file-read-only syntax-file)
+	  (mew-frwlet
+	   mew-cs-draft mew-cs-noconv
+	   (find-file-read-only syntax-file))
 	  (goto-char (point-min))
 	  (setq syntax (read (current-buffer)))
 	  (kill-buffer (current-buffer)))