[mew-dist 28064] mew-summary-join
Kouichi Satake
ksatake at example.com
2008年 2月 15日 (金) 21:34:39 JST
佐竹と言います。こんにちわ。
Mew 5.2.50 を "Meadow-3.00-dev (KIKU)" で使ってます。
mew-summary-join が動作していないように思います。
mewl が mew-suffix をちゃんと見ているのに、テンポラリファイルに
書き出す方が mew-suffix を考慮していないように見えました。
(私はLispは良く分からないのでなんとなくですが。)
ちなみに私は (setq mew-use-suffix t) を指定しています。
以下のような修正でうまく動いているようです。
===========================================================
--- mew-summary4.el.org 2007-08-04 14:47:36.189950200 +0900
+++ mew-summary4.el 2008-02-15 20:52:58.546875000 +0900
@@ -777,7 +777,7 @@
(while targets
(setq fld-msg (car targets))
(setq targets (cdr targets))
- (insert (cdr fld-msg) "\n"))
+ (insert (cdr fld-msg) mew-suffix "\n"))
(mew-frwlet
mew-cs-text-for-read mew-cs-text-for-write
(write-region (point-min) (point-max) tfile nil 'no-msg))
===========================================================
この修正が正しい修正なのかどうかわかりませんが報告しておきます。
--
佐竹
Mew-dist メーリングリストの案内