Fix consecutive radio links

* lisp/org.el (org-activate-target-links): Properly match consecutive
  radio links.

Reported-by: Jay Dresser <jay@jaydresser.us>
<http://lists.gnu.org/r/emacs-orgmode/2019-01/msg00327.html>
This commit is contained in:
Nicolas Goaziou 2019-01-24 15:03:47 +01:00
parent 010a35f193
commit 24030ef62b
1 changed files with 3 additions and 0 deletions

View File

@ -6163,6 +6163,9 @@ by a #."
"Add text properties for target matches." "Add text properties for target matches."
(when org-target-link-regexp (when org-target-link-regexp
(let ((case-fold-search t)) (let ((case-fold-search t))
;; `org-target-link-regexp' matches one character before the
;; actual target.
(unless (bolp) (forward-char -1))
(when (re-search-forward org-target-link-regexp limit t) (when (re-search-forward org-target-link-regexp limit t)
(org-remove-flyspell-overlays-in (match-beginning 1) (match-end 1)) (org-remove-flyspell-overlays-in (match-beginning 1) (match-end 1))
(add-text-properties (match-beginning 1) (match-end 1) (add-text-properties (match-beginning 1) (match-end 1)