debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2024-11-28 21:54:10 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

notmuch.el: Bring back the "End of search results." message.

Browse source 
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.
This commit is contained in:
Carl Worth 2009-11-05 14:18:44 -08:00
parent 51a68d4e01
commit afcd85ee71
1 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
notmuch.el
View file

@ -674,15 +674,16 @@ global search.
(save-excursion (save-excursion
(beginning-of-line) (beginning-of-line)
(let ((beg (point))) (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))))) (filter-buffer-substring beg (point)))))
(defun notmuch-search-markup-this-thread-id () (defun notmuch-search-markup-this-thread-id ()
(beginning-of-line) (beginning-of-line)
(let ((beg (point))) (let ((beg (point)))
(re-search-forward "thread:[a-fA-F0-9]*") (if (re-search-forward "thread:[a-fA-F0-9]*" nil t)
(progn
(forward-char) (forward-char)
(overlay-put (make-overlay beg (point)) 'invisible 'notmuch-search))) (overlay-put (make-overlay beg (point)) 'invisible 'notmuch-search)))))
(defun notmuch-search-markup-thread-ids () (defun notmuch-search-markup-thread-ids ()
(save-excursion (save-excursion