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
(goto-char (point-min))
(while (re-search-forward name nil t)
(let ((element (org-element-at-point)))
(when (equal words
(split-string
(org-element-property :name element)))
(let* ((element (org-element-at-point))
(name (org-element-property :name element)))
(when (and name (equal words (split-string name)))
(setq type 'dedicated)
(beginning-of-line)
(throw :name-match t))))