[notmuch] [PATCH] Better folder name search strategy.

2010-01-29 Thread Servilio Afre Puentes
This allows the use non-word characters (e.g.: "/") as the folder name
in the notmuch-folders variable.
---
 notmuch.el |4 +++-
 1 files changed, 3 insertions(+), 1 deletions(-)

diff --git a/notmuch.el b/notmuch.el
index 97914f2..bdb0200 100644
--- a/notmuch.el
+++ b/notmuch.el
@@ -1467,7 +1467,9 @@ Currently available key bindings:
   (save-excursion
 (beginning-of-line)
 (let ((beg (point)))
-  (forward-word)
+  (save-match-data
+   (re-search-forward "[ \t]" nil t))
+  (backward-char)
   (filter-buffer-substring beg (point)

 (defun notmuch-folder-show-search ( folder)
-- 
1.6.5


[notmuch] [PATCH] Better folder name search strategy.

2010-01-29 Thread Servilio Afre Puentes
This allows the use non-word characters (e.g.: /) as the folder name
in the notmuch-folders variable.
---
 notmuch.el |4 +++-
 1 files changed, 3 insertions(+), 1 deletions(-)

diff --git a/notmuch.el b/notmuch.el
index 97914f2..bdb0200 100644
--- a/notmuch.el
+++ b/notmuch.el
@@ -1467,7 +1467,9 @@ Currently available key bindings:
   (save-excursion
 (beginning-of-line)
 (let ((beg (point)))
-  (forward-word)
+  (save-match-data
+   (re-search-forward [ \t] nil t))
+  (backward-char)
   (filter-buffer-substring beg (point)

 (defun notmuch-folder-show-search (optional folder)
-- 
1.6.5
___
notmuch mailing list
notmuch@notmuchmail.org
http://notmuchmail.org/mailman/listinfo/notmuch