[Mew-dist 393] Can't save articles by mew-gnus.el (Sakai-san version).

[Mikio Nakajima]

  中島です。

  X-Sequence: Mew-dist 310 で酒井さんがポストされた mew-gnus.el (こ
れ以降、mew-gnus.el に新しい動きはないですよね？  見落していたらご
めんなさい) を使わせていただいているのですが、o コマンドでセーブし
ようとすると rcvstore に引数を渡すときに folder 名の前に "+" が付い
ていないために、rcvstore の help メッセージを出力して記事がセーブで
きませんでした。

とりあえず "+" を付けるだけのパッチです。

中島幹夫 <gy2m-nkjm at example.com>


-------------- next part --------------
*** mew-gnus.el.orig	Thu Jan  2 17:36:06 1997
--- mew-gnus.el	Sat Jan 11 08:24:40 1997
***************
*** 44,50 ****
  	(unwind-protect
              (call-process-region (point-min) (point-max)
                                   (expand-file-name "rcvstore" mh-lib)
!                                  nil errbuf nil folder)
            (set-buffer errbuf)
            (if (zerop (buffer-size))
                (message "Article saved in folder: %s" folder)
--- 44,50 ----
  	(unwind-protect
              (call-process-region (point-min) (point-max)
                                   (expand-file-name "rcvstore" mh-lib)
!                                  nil errbuf nil (concat "+" folder) )
            (set-buffer errbuf)
            (if (zerop (buffer-size))
                (message "Article saved in folder: %s" folder)