[mew-dist 22261] Re: accelerating by-folder

[KOIE Hidetaka ( 鯉江英隆 )]

  Message-Id: <20021112.213350.125112311.kazu at example.com>
  Date:       Tue, 12 Nov 2002 21:33:50 +0900 (JST)
  From:       Kazu Yamamoto (山本和彦) <kazu at example.com>
  Subject:    [mew-dist 22256] accelerating by-folder

  | (("+foo/" "foo") ("+foo/foo" "foo")) のときは、後者にマッチすべきです
  | が、rassoc では前者にマッチします。しかし、これも解決してしまいました。
  | (だから、Lisp は好きなの)

[この関数がどのように使われるか知らないままに返事してます]

(mew-assoc-folder
 "foo"
 '(("+foo/" . "foo") ("+foo/foo/" . "foo") ("+foo/foo/foo" . "foo"))
 t)
=> ("+foo/foo/" . "foo")

となるみたいですが、よいでしょうか。

--
鯉江英隆 <hide at example.com>