lisp/org.el (org-mode): Fix thingatpt support for Emacs 27
This commit is contained in:
parent
66cb45658d
commit
6f152d8914
|
@ -5043,9 +5043,10 @@ The following commands are available:
|
||||||
(setq-local buffer-face-mode-face 'org-default)
|
(setq-local buffer-face-mode-face 'org-default)
|
||||||
|
|
||||||
;; `thing-at-point' support
|
;; `thing-at-point' support
|
||||||
(setq-local thing-at-point-provider-alist
|
(when (boundp 'thing-at-point-provider-alist)
|
||||||
(cons '(url . org--link-at-point)
|
(setq-local thing-at-point-provider-alist
|
||||||
thing-at-point-provider-alist))
|
(cons '(url . org--link-at-point)
|
||||||
|
thing-at-point-provider-alist)))
|
||||||
(when (boundp 'forward-thing-provider-alist)
|
(when (boundp 'forward-thing-provider-alist)
|
||||||
(setq-local forward-thing-provider-alist
|
(setq-local forward-thing-provider-alist
|
||||||
(cons '(url . org-next-link)
|
(cons '(url . org-next-link)
|
||||||
|
|
Loading…
Reference in New Issue