Fix b6b509b
one more time.
This commit is contained in:
parent
01748861d4
commit
8e22aafe9a
12
lisp/org.el
12
lisp/org.el
|
@ -5519,15 +5519,15 @@ by a #."
|
||||||
(if (and (re-search-forward org-tsr-regexp-both limit t)
|
(if (and (re-search-forward org-tsr-regexp-both limit t)
|
||||||
(not (equal (char-before (match-beginning 0)) 91)))
|
(not (equal (char-before (match-beginning 0)) 91)))
|
||||||
(progn
|
(progn
|
||||||
(org-remove-flyspell-overlays-in (match-beginning 1) (match-end 1))
|
(org-remove-flyspell-overlays-in (match-beginning 0) (match-end 0))
|
||||||
(add-text-properties (match-beginning 1) (match-end 1)
|
(add-text-properties (match-beginning 0) (match-end 0)
|
||||||
(list 'mouse-face 'highlight
|
(list 'mouse-face 'highlight
|
||||||
'keymap org-mouse-map))
|
'keymap org-mouse-map))
|
||||||
(org-rear-nonsticky-at (match-end 1))
|
(org-rear-nonsticky-at (match-end 0))
|
||||||
(when org-display-custom-times
|
(when org-display-custom-times
|
||||||
(if (match-end 4)
|
(if (match-end 3)
|
||||||
(org-display-custom-time (match-beginning 4) (match-end 4)))
|
(org-display-custom-time (match-beginning 3) (match-end 3)))
|
||||||
(org-display-custom-time (match-beginning 2) (match-end 2)))
|
(org-display-custom-time (match-beginning 1) (match-end 1)))
|
||||||
t)))
|
t)))
|
||||||
|
|
||||||
(defvar org-target-link-regexp nil
|
(defvar org-target-link-regexp nil
|
||||||
|
|
Loading…
Reference in New Issue