2008年4月24日

[mew-dist 28364] Re: Multipart/Alternative

白井です。

From: Murata Takashi (村田 隆) <tmurata@xxxxx> さん曰く
Subject: [mew-dist 28363] Multipart/Alternative
Message-ID: <20080423.181153.34930920.tmurata@xxxxx>
Date: Wed, 23 Apr 2008 18:11:53 +0900 (JST)

> Multipart/Alternative のメールは、Summary上で "M" が付きますが、添付

> ファイル付きと区別が付かないので、"m" とか "_" とか、見た目を弱くしたい
> のですが、どうでしょうか?

> 添付ファイル付きのメールを探すとき、最初は目視で "M" 付きを探すのです
> が、最近は Alternative が増えて来て、どうにも鬱陶しいのです。

大賛成に一票です。

以下のパッチで "m" が付くようになりますが、".", "-", "_" の様に
もっと見た目が邪魔にならない方が良いですね。はたまた、":" を表示
して、ML に流れる質問を減らすか。。。

Index: mew-scan.el
===================================================================
RCS file: /cvsmew/mew/mew-scan.el,v
retrieving revision 1.247
diff -u -r1.247 mew-scan.el
--- mew-scan.el 18 Mar 2008 03:04:58 -0000 1.247
+++ mew-scan.el 23 Apr 2008 10:29:18 -0000
@@ -105,6 +105,7 @@
((string-match mew-ct-smm-sig ct) "S")
((string-match mew-ct-smm-enc ct) "E")
(t "E"))) ;; smime-type is optional, sigh
+ ((mew-ct-alternativep ct) "m")
((mew-ct-multipartp ct) "M")
((string-match "Message/Partial" ct) "P")
(t " "))))
Index: mew-vars2.el
===================================================================
RCS file: /cvsmew/mew/mew-vars2.el,v
retrieving revision 1.176
diff -u -r1.176 mew-vars2.el
--- mew-vars2.el 7 Apr 2008 08:31:40 -0000 1.176
+++ mew-vars2.el 23 Apr 2008 10:29:18 -0000
@@ -198,6 +198,9 @@
(defun mew-ct-multipartp (ct)
(string-match "^Multipart" (capitalize ct)))

+(defun mew-ct-alternativep (ct)
+ (string-match "^Multipart/Alternative" (capitalize ct)))
+
(defun mew-ct-messagep (ct)
(string-match "^Message" (capitalize ct)))

--
白井秀行 (mailto:shirai@xxxxx)

投稿者 xml-rpc : 2008年4月24日 00:07
役に立ちました?:
過去のフィードバック 平均:(0) 総合:(0) 投票回数:(0)
本記事へのTrackback: http://hoop.euqset.org/blog/mt-tb2006.cgi/72434
トラックバック
コメント
コメントする




画像の中に見える文字を入力してください。