Return 'dedicated on match when search must match exact headline

* org.el (org-link-search): Return 'dedicated on successful match when org-link-search-must-match-exact-headline is set to t.
2010-10-12 21:00:12 +00:00 · 2010-10-12 21:00:12 +00:00 · c1b8f41c37
parent c486572df0
commit c1b8f41c37
1 changed files with 1 additions and 0 deletions
--- a/lisp/org.el
+++ b/lisp/org.el
@ -9428,6 +9428,7 @@ in all files.  If AVOID-POS is given, ignore matches near that position."
 				     (regexp-quote s))
 			     nil t))
 	;; OK, found a match
+	(setq type 'dedicated)
 	(goto-char (match-beginning 0)))
       ((and (not org-link-search-inhibit-query)
 	     (eq org-link-search-must-match-exact-headline 'query-to-create)