* wl-vars.el (wl-folder-hierarchy-access-folders): Fix regexp.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 870c6c5..d3079fb 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,7 @@
+2005-10-14  Yoichi NAKAYAMA  <yoichi@geiin.org>
+
+       * wl-vars.el (wl-folder-hierarchy-access-folders): Fix regexp.
+
 2005-10-13  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
        * wl-mime.el (wl-summary-burst-subr): Disable multibyte characters

diff --git a/wl/wl-vars.el b/wl/wl-vars.el
index 141ba8e..ccab50d 100644 (file)
--- a/wl/wl-vars.el
+++ b/wl/wl-vars.el
@@ -2518,7 +2518,7 @@ ex.
                               (string :tag "Folder"))))
   :group 'wl-folder)
 
-(defcustom wl-folder-hierarchy-access-folders '("^-[^\\.]*\\(:\\|@\\|$\\)"
+(defcustom wl-folder-hierarchy-access-folders '("^-[^.]*\\(:\\|@\\|$\\)"
                                                "^@$" "^'$")
   "*Access group REGEXPs to make hierarchy structure."
   :type '(repeat (string :tag "Regexp"))