[Mew-dist 04123] mew-summary-join

[koie at example.com]

mew-1.93b23のmew-summary-joinに対するパッチです。

diff -u mew-summary.el.org mew-summary.el
--- mew-summary.el.org	Sat Mar  7 14:36:35 1998
+++ mew-summary.el	Sat Mar  7 14:49:59 1998
@@ -1984,7 +1984,7 @@
       (setq fld (car (mew-current-get 'message)))
       (setq msgs (cdr (mew-current-get 'message))))
     (message "Joining marked messages to %s ..." fld)
-    (apply 'mew-im-call-process mew-prog-imjoin
+    (apply 'mew-im-call-process nil mew-prog-imjoin
 	   (format "--src=%s" fld) (format "--dst=%s" folder) msgs)
     (message "Joining marked messages to %s ... done" fld)
     ))

--
KOIE Hidetaka 鯉江英隆 koie at example.com 数理技研 SURIGIKEN Co.,LTD.