* wl-e21.el (wl-highlight-folder-current-line): Fixed regexp.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index a224bd9..0d09471 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,7 @@
+2001-09-11  Yuuichi Teranishi  <teranisi@gohome.org>
+
+       * wl-e21.el (wl-highlight-folder-current-line): Fixed regexp.
+
 2001-09-10  Yuuichi Teranishi  <teranisi@gohome.org>
 
        * wl-draft.el (wl-draft-std11-parse-addresses): Ignore trailing

diff --git a/wl/wl-e21.el b/wl/wl-e21.el
index edcf99a..242323f 100644 (file)
--- a/wl/wl-e21.el
+++ b/wl/wl-e21.el
@@ -342,7 +342,7 @@ corresponding to the mode line clicked."
        (;; basic folder
        (and (setq fld-name (wl-folder-get-folder-name-by-id
                             (get-text-property (point) 'wl-folder-entity-id)))
-            (looking-at "[[:blank:]]+\\([[:blank:]\n]+\\)"))
+            (looking-at "[[:blank:]]+\\([^[:blank:]\n]+\\)"))
        (setq start (match-beginning 1)
              end (match-end 1))
        (let (image)