Merge branch 'maint'
This commit is contained in:
commit
6589b9925c
10
lisp/org.el
10
lisp/org.el
|
@ -5455,13 +5455,7 @@ will be prompted for."
|
|||
"Run through the buffer and add overlays to links."
|
||||
(catch 'exit
|
||||
(let (f)
|
||||
(if (and (re-search-forward (concat org-plain-link-re) limit t)
|
||||
(or (not (member 'bracket org-activate-links))
|
||||
(save-excursion
|
||||
(save-match-data
|
||||
(goto-char (match-beginning 0))
|
||||
(not (looking-back "\\[\\["))))))
|
||||
(progn
|
||||
(when (re-search-forward (concat org-plain-link-re) limit t)
|
||||
(org-remove-flyspell-overlays-in (match-beginning 0) (match-end 0))
|
||||
(setq f (get-text-property (match-beginning 0) 'face))
|
||||
(if (or (eq f 'org-tag)
|
||||
|
@ -5472,7 +5466,7 @@ will be prompted for."
|
|||
'face 'org-link
|
||||
'keymap org-mouse-map))
|
||||
(org-rear-nonsticky-at (match-end 0)))
|
||||
t)))))
|
||||
t))))
|
||||
|
||||
(defun org-activate-code (limit)
|
||||
(if (re-search-forward "^[ \t]*\\(:\\(?: .*\\|$\\)\n?\\)" limit t)
|
||||
|
|
Loading…
Reference in New Issue