* wl-vars.el (wl-folder-hierarchy-access-folders): Add "^'$"

to the default value.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 7e77fa1..8a9a229 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2004-01-12  Yoichi NAKAYAMA  <yoichi@geiin.org>
+
+       * wl-vars.el (wl-folder-hierarchy-access-folders): Add "^'$"
+       to the default value.
+
 2004-01-11  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
        * wl-summary.el (wl-summary-mark-as-read-all): Follow the API

diff --git a/wl/wl-vars.el b/wl/wl-vars.el
index 8a27b1c..eb55cf4 100644 (file)
--- a/wl/wl-vars.el
+++ b/wl/wl-vars.el
@@ -2371,7 +2371,7 @@ POLICY is copy or move."
   :group 'wl-pref)
 
 (defcustom wl-folder-hierarchy-access-folders '("^-[^\\.]*\\(:\\|@\\|$\\)"
-                                               "^@$")
+                                               "^@$" "^'$")
   "*Access group REGEXPs to make hierarchy structure."
   :type '(repeat (string :tag "Regexp"))
   :group 'wl-folder)