[Mew-dist 05059] patch for Mew 1.93b3[89]

[TAKAHASHI Masafumi]

高橋@エヌアイデイ です。

In message <19980608212229V.kazu at example.com>
  Kazu Yamamoto (山本和彦) <kazu at example.com> writes:

> (2) mew-end-of-{message,part}-string を導入しました。読んでいてマルチ
> パートなのか判断が付きにくいという方は、以下のように設定すればいいでしょ
> う。
> 
> (setq mew-end-of-message-string "[End of message]")
> (setq mew-end-of-part-string "[Message is continued]")

この変数ですが、初期値が nil なので、ユーザがどちらか
片方だけ値を設定した場合に nil を insert する結果となり
エラーになってしまいます。
以下のように修正してみました。最初、変数の初期値を "" に
しようかとも思いましたが、「何もさせたくない時は nil」と
いうほうが美しいですよね。

# (insert nil) がエラーにならなければ良いのに…


diff -u mew-1.93b39.orig/mew-mime.el mew-1.93b39/mew-mime.el
--- mew-1.93b39.orig/mew-mime.el	Mon Jun  8 13:46:49 1998
+++ mew-1.93b39/mew-mime.el	Fri Jun 12 18:44:41 1998
@@ -147,9 +147,12 @@
 		      (if (and (<= beg pos) (< pos end))
 			  (setq msgp t)))
 		    (if msgp
-			(insert mew-end-of-message-string)
-		      (insert mew-end-of-part-string)))
-		(insert mew-end-of-message-string)))
+			(and mew-end-of-message-string
+                             (insert mew-end-of-message-string))
+		      (and mew-end-of-part-string
+                           (insert mew-end-of-part-string))))
+		(and mew-end-of-message-string
+                     (insert mew-end-of-message-string))))
 	  ;; Highlight
 	  (mew-highlight-url)
 	  (mew-highlight-body))


-- 
高橋雅史 (株)エヌアイデイ
<takahasi at example.com>