Merge branch 'maint'
This commit is contained in:
commit
f874644e5b
|
@ -1178,10 +1178,9 @@ of matched result, which is either `dedicated' or `fuzzy'."
|
||||||
(catch :name-match
|
(catch :name-match
|
||||||
(goto-char (point-min))
|
(goto-char (point-min))
|
||||||
(while (re-search-forward name nil t)
|
(while (re-search-forward name nil t)
|
||||||
(let ((element (org-element-at-point)))
|
(let* ((element (org-element-at-point))
|
||||||
(when (equal words
|
(name (org-element-property :name element)))
|
||||||
(split-string
|
(when (and name (equal words (split-string name)))
|
||||||
(org-element-property :name element)))
|
|
||||||
(setq type 'dedicated)
|
(setq type 'dedicated)
|
||||||
(beginning-of-line)
|
(beginning-of-line)
|
||||||
(throw :name-match t))))
|
(throw :name-match t))))
|
||||||
|
|
Loading…
Reference in New Issue