[Mew-dist 04891] Re: 1.93b35

[Mito]

※ "さ" こと saito at example.com さんの
   『[Mew-dist 04875] Re: 1.93b35』より

さ>     1 M05/26 Norio Suzuki         [Mew-dist 04873] Re: さっそくの返事ありがとうございます。 (setq debug-on-error t) を 
さ> G    2  Text/Plain(iso-2022-jp)      .emacs
さ>                                                .emacs
さ> G    3  Text/Plain(iso-2022-jp)      site-start.el
さ>                                         site-start.el

さ> こんな感じに表示されているんですが，ウチだけでしょうか．

応急処置です。

ところで、Content-Description には "\n" を含めることができる
と思うのですが、そういう場合はどういう表示が望ましいんでしょ
うね。

--- mew-syntax.el	1998/05/27 04:13:32	1.1
+++ mew-syntax.el	1998/05/27 04:13:36
@@ -695,6 +695,9 @@
 	    (if asterisk
 		(setq file (concat (mew-substring file lfc*) AR cnt))
 	      (setq file (concat (mew-substring file lfc) cnt)))))
+    (let ((mp (string-match "\n" cd-or-dec)))
+      (if mp
+          (setq cd-or-dec (substring cd-or-dec 0 mp))))
     (insert
      (concat
       marks
-- 
5/27 13:34頃
NECソフトウェア新潟 水戸
mailto:mit at example.com \n