From: yoichi <yoichi>
Date: Wed, 27 Feb 2002 04:15:41 +0000 (+0000)
Subject: Now wl-folder-hierarchy-access-folders takes REGEXP of group names.
X-Git-Tag: wl-2_9_8~38
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=89c0b7e0e6e8721fd6fe3b32dbf18ac38c531db7;p=elisp%2Fwanderlust.git

Now wl-folder-hierarchy-access-folders takes REGEXP of group names.
---

diff --git a/doc/wl-ja.texi b/doc/wl-ja.texi
index bf81372..1bc6b67 100644
--- a/doc/wl-ja.texi
+++ b/doc/wl-ja.texi
@@ -2074,12 +2074,12 @@ Non-nil ならフォルダ一覧用に新しいフレームを開きます。
 
 @lisp
 @group
-("-" "-alt")
+("^-$" "^-alt$")
 @end group
 @end lisp
 
 @noindent
-階層構造に作成するアクセスグループフォルダのリスト。
+階層構造に作成するアクセスグループの正規表現からなるリストです。
 
 例えば、以下のように 
 @code{wl-folder-hierarchy-access-folders} を設定すると、
@@ -2087,7 +2087,7 @@ Non-nil ならフォルダ一覧用に新しいフレームを開きます。
 @lisp
 @group
 (setq wl-folder-hierarchy-access-folders
-     '("-" "-alt" "-japan" "-comp" "-comp.unix"))
+     '("^-$" "^-alt$" "^-japan$" "^-comp$" "^-comp.unix$"))
 @end group
 @end lisp
 
diff --git a/doc/wl.texi b/doc/wl.texi
index 51e92fb..eed8563 100644
--- a/doc/wl.texi
+++ b/doc/wl.texi
@@ -2069,12 +2069,13 @@ The initial setting is the list shown below:
 
 @lisp
 @group
-("-" "-alt")
+("^-$" "^-alt$")
 @end group
 @end lisp
 
 @noindent
-A list of access groups which creates children folder list hierarchically.
+A list of regular expressions for access groups which creates children
+folder list hierarchically.
 
 For example, if you specify
 @code{wl-folder-hierarchy-access-folders} like following,
@@ -2082,7 +2083,7 @@ For example, if you specify
 @lisp
 @group
 (setq wl-folder-hierarchy-access-folders
-     '("-" "-alt" "-japan" "-comp" "-comp.unix"))
+     '("^-$" "^-alt$" "^-japan$" "^-comp$" "^-comp.unix$"))
 @end group
 @end lisp