X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=blobdiff_plain;f=emacs%2Fnotmuch.el;h=117a365803ff76f423dc869afb9b612bb9f9798f;hp=904272dfd9cc36b89b22d58df348eeff71cee3a4;hb=bb61755afe0deddbb146222a4e42547b00a7fd76;hpb=70ef8de79850035bb0149ea0ab900a5dd64439b9

diff --git a/emacs/notmuch.el b/emacs/notmuch.el
index 904272df..117a3658 100644
--- a/emacs/notmuch.el
+++ b/emacs/notmuch.el
@@ -1482,7 +1482,7 @@ This function advances the next thread when finished."
 			    (insert (format " (process returned %d)" exit-status)))
 			(insert "\n")
 			(if (and atbob
-				 notmuch-search-target-thread)
+				 (not (string= notmuch-search-target-thread "found")))
 			    (set 'never-found-target-thread t))))))
 	      (if (and never-found-target-thread
 		       notmuch-search-target-line)
@@ -1515,11 +1515,10 @@ This function advances the next thread when finished."
 			(put-text-property beg (point-marker) 'notmuch-search-thread-id thread-id)
 			(put-text-property beg (point-marker) 'notmuch-search-authors authors)
 			(put-text-property beg (point-marker) 'notmuch-search-subject subject)
-			(if (and notmuch-search-target-thread
-				 (string= thread-id notmuch-search-target-thread))
+			(if (string= thread-id notmuch-search-target-thread)
 			    (progn
 			      (set 'found-target beg)
-			      (set 'notmuch-search-target-thread nil))))
+			      (set 'notmuch-search-target-thread "found"))))
 		      (set 'line (match-end 0)))
 		  (set 'more nil)))))
 	  (if found-target