[mew-dist 22904] Re: imap での refil

[ml at example.com]

ml at example.com wrote in message
Message-ID:<20030119.042715.96937968.nara at example.com>

> 以下のようにして頂けると嬉しいのですが。
> そうすれば、mew-refile-guess-alist の設定が同じでいけますので。

diff でファイルの指定順が新旧間違ってました。

それと、imap の時は、inbox.XXX にならないといけないんですね。
mewの関数を上手く使ってないので、修正の仕方が間違ってると思いますが、
気持は以下のようになればと思います。

diff -Nru mew-refile.el my-mew-refile.el 
--- mew-refile.el	2003-01-17 01:05:12.000000000 +0900
+++ my-mew-refile.el	2003-01-19 06:11:50.000000000 +0900
@@ -221,7 +221,12 @@
        ((setq header (mew-header-get-value key))
 	(while alist
 	  (setq val (car (car alist)))
-	  (setq f-or-r (cdr (car alist)))
+          (cond
+           ((string-match (mew-sinfo-get-proto) "%")
+            (setq f-or-r 
+                  (concat (mew-sinfo-get-proto) "inbox." (cdr (car alist)))))
+           ((t
+             (setq f-or-t (concat (mew-sinfo-get-proto) (cdr (car alist)))))))
 	  (setq ent nil)
 	  (when (and (stringp val) (string-match val header))
 	    (cond
--
NARA, Susumu