X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=blobdiff_plain;f=notmuch.el;h=592c5ab58da2329806e99cbd695c1d713080db38;hp=de1eb9f1e1781ebc89694cdf50e3ddffeab28c3a;hb=afcd85ee71b9b835da88be371351f2ddab426714;hpb=51a68d4e0155b595f1effc7cb24f1fe55c96bed8 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