[Mew-dist 14128] Re: (祝) 予選突破バージョン

[Takashi SATOH]

さとーと申します。

From: Kazu Yamamoto (山本和彦) <kazu at example.com>
Subject: [Mew-dist 14120] (祝) 予選突破バージョン
Date: Thu, 21 Sep 2000 18:09:48 +0900

kazu>フォルダごとに、scan form を定義するには、mew-scan-form-list を使って
kazu>下さい。こんな感じ：
kazu>
kazu>  '((("+inbox" "+tmp")

このフォルダ指定が Windows な環境では効きません。

ということで、添付のパッチのように mew-folder-regex を
file-name-as-directory の外側にすると効くようになるのですが、
これでいいのでしょうか。


-------------------------------------------------
  Takashi Satoh   mailto:satoh at example.com
-------------------------------------------------

-------------- next part --------------
*** mew-scan.el	Thu Sep 21 20:51:01 2000
--- mew-scan.el.org	Thu Sep 21 17:48:05 2000
***************
*** 177,183 ****
  	  (setq fld (car flds))
  	  (setq flds (cdr flds))
  	  (if (string-match
! 	       (mew-folder-regex (file-name-as-directory fld))
  	       target)
  	      (throw 'loop (setq ret form))))))
      (if ret form mew-scan-form)))
--- 177,183 ----
  	  (setq fld (car flds))
  	  (setq flds (cdr flds))
  	  (if (string-match
! 	       (file-name-as-directory (mew-folder-regex fld))
  	       target)
  	      (throw 'loop (setq ret form))))))
      (if ret form mew-scan-form)))