2008年11月17日

[mew-dist 28721] Re:'o' で出てくる世界の違うフォルダ

From: Kazu Yamamoto (山本和彦) <kazu@xxxxx> さん曰く
Subject: [mew-dist 28718] Re: 'o' で出てくる世界の違うフォルダ
Message-ID: <20081114.194607.105673287.kazu@xxxxx>
Date: Fri, 14 Nov 2008 19:46:07 +0900 (JST)

> > どーもです。が、mew-refile-guess-by-alist が間違っているようで、
> > auto refile が動かなくなりました。
>

> 失礼しました。
>
> > とすると動きますが、mew-inherit-refile-proto の正しい値が不明な
> > ので、あとはおまかせです。
>
> OK です。マージしました。

だめでした ^^;;;

パッチの様にしないと、他の mew-refile-guess-by-* が動きません。

--
白井秀行 (mailto:shirai@xxxxx)

Index: mew-refile.el
===================================================================
RCS file: /cvsroot/shirai/mew/mew/mew-refile.el,v
retrieving revision 1.126
diff -u -u -r1.126 mew-refile.el
--- mew-refile.el 17 Nov 2008 00:18:20 -0000 1.126
+++ mew-refile.el 17 Nov 2008 00:28:54 -0000
@@ -210,7 +210,7 @@

(defun mew-refile-guess-by-alist ()
(let ((alist (mew-refile-guess-alist mew-inherit-refile-case))
- (proto (substring mew-inherit-refile-proto 0 1)))
+ (proto mew-inherit-refile-proto))
;; Guess folders by user-configured alist.
(mew-refile-guess-by-alist1 alist proto)))

@@ -679,7 +679,7 @@
(setq msg (mew-sumsyn-message-number)) ;; msg is never nil
(setq invalidp (not (mew-msg-validp msg))))
(setq mew-inherit-refile-case (mew-case:folder-case fld))
- (setq mew-inherit-refile-proto (mew-case:folder-folder fld))
+ (setq mew-inherit-refile-proto (substring (mew-case:folder-folder fld) 0 1))
(setq mark (mew-summary-get-mark)) ;; any mark
(cond
((and mark (> (mew-markdb-level mark) (mew-markdb-level mew-mark-refile)))
@@ -769,7 +769,7 @@
(setq fld (mew-sumsyn-folder-name))
(setq msg (mew-sumsyn-message-number))))
(setq mew-inherit-refile-case (mew-case:folder-case fld))
- (setq mew-inherit-refile-proto (mew-case:folder-folder fld))
+ (setq mew-inherit-refile-proto (substring (mew-case:folder-folder fld) 0 1))
(with-temp-buffer
(mew-insert-message
fld msg mew-cs-text-for-read mew-header-reasonable-size)


投稿者 xml-rpc : 2008年11月17日 09:32
役に立ちました?:
過去のフィードバック 平均:(0) 総合:(0) 投票回数:(0)
本記事へのTrackback: http://hoop.euqset.org/blog/mt-tb2006.cgi/79160
トラックバック
コメント
コメントする




画像の中に見える文字を入力してください。