Merge branch 'maint'

This commit is contained in:
Kyle Meyer 2020-11-30 23:52:09 -05:00
commit f874644e5b
1 changed files with 3 additions and 4 deletions

View File

@ -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))))