Fix #2972: infinite recursion in org + python src blocks
This commit is contained in:
parent
bd58f0ae71
commit
0e50db55a0
1 changed files with 7 additions and 6 deletions
|
@ -168,12 +168,6 @@ This forces it to read the background before rendering."
|
||||||
("HOLD" . +org-todo-onhold)
|
("HOLD" . +org-todo-onhold)
|
||||||
("PROJ" . +org-todo-project)))
|
("PROJ" . +org-todo-project)))
|
||||||
|
|
||||||
(after! org-eldoc
|
|
||||||
;; HACK Fix #2972: infinite recursion when eldoc kicks in in an 'org' src
|
|
||||||
;; block.
|
|
||||||
;; TODO Should be reported upstream!
|
|
||||||
(puthash "org" "ignore" org-eldoc-local-functions-cache))
|
|
||||||
|
|
||||||
(defadvice! +org-display-link-in-eldoc-a (&rest args)
|
(defadvice! +org-display-link-in-eldoc-a (&rest args)
|
||||||
"Display full link in minibuffer when cursor/mouse is over it."
|
"Display full link in minibuffer when cursor/mouse is over it."
|
||||||
:before-until #'org-eldoc-documentation-function
|
:before-until #'org-eldoc-documentation-function
|
||||||
|
@ -501,6 +495,13 @@ eldoc string."
|
||||||
nil 'face `(:foreground ,(face-foreground face nil t) :weight bold)))
|
nil 'face `(:foreground ,(face-foreground face nil t) :weight bold)))
|
||||||
width prefix separator))
|
width prefix separator))
|
||||||
|
|
||||||
|
(after! org-eldoc
|
||||||
|
;; HACK Fix #2972: infinite recursion when eldoc kicks in in 'org' or
|
||||||
|
;; 'python' src blocks.
|
||||||
|
;; TODO Should be reported upstream!
|
||||||
|
(puthash "org" #'ignore org-eldoc-local-functions-cache)
|
||||||
|
(puthash "python" #'python-eldoc-function org-eldoc-local-functions-cache))
|
||||||
|
|
||||||
(defun +org--restart-mode-h ()
|
(defun +org--restart-mode-h ()
|
||||||
"Restart `org-mode', but only once."
|
"Restart `org-mode', but only once."
|
||||||
(quiet! (org-mode-restart))
|
(quiet! (org-mode-restart))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue