aboutsummaryrefslogtreecommitdiffhomepage
path: root/notmuch.el
diff options
context:
space:
mode:
authorGravatar Carl Worth <cworth@cworth.org>2009-11-05 14:18:44 -0800
committerGravatar Carl Worth <cworth@cworth.org>2009-11-05 14:18:44 -0800
commitafcd85ee71b9b835da88be371351f2ddab426714 (patch)
tree2c27681c16f92c5907ed385a79b8cbf8ef1b740f /notmuch.el
parent51a68d4e0155b595f1effc7cb24f1fe55c96bed8 (diff)
notmuch.el: Bring back the "End of search results." message.
The recent change of the hidden thread-ID syntax caused this message to instead be replaced with a cryptic "search failed" error and an internal regular expression. Put our nice message back.
Diffstat (limited to 'notmuch.el')
-rw-r--r--notmuch.el9
1 files changed, 5 insertions, 4 deletions
diff --git a/notmuch.el b/notmuch.el
index de1eb9f1..592c5ab5 100644
--- a/notmuch.el
+++ b/notmuch.el
@@ -674,15 +674,16 @@ global search.
(save-excursion
(beginning-of-line)
(let ((beg (point)))
- (re-search-forward "thread:[a-fA-F0-9]*")
+ (re-search-forward "thread:[a-fA-F0-9]*" nil t)
(filter-buffer-substring beg (point)))))
(defun notmuch-search-markup-this-thread-id ()
(beginning-of-line)
(let ((beg (point)))
- (re-search-forward "thread:[a-fA-F0-9]*")
- (forward-char)
- (overlay-put (make-overlay beg (point)) 'invisible 'notmuch-search)))
+ (if (re-search-forward "thread:[a-fA-F0-9]*" nil t)
+ (progn
+ (forward-char)
+ (overlay-put (make-overlay beg (point)) 'invisible 'notmuch-search)))))
(defun notmuch-search-markup-thread-ids ()
(save-excursion