hiro/emacs-jupyter
1
0
Fork 0
mirror of https://github.com/vale981/emacs-jupyter synced 2025-03-05 07:41:37 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

ob-jupyter.el: Don't make language aliases at load time

Browse source
This commit is contained in:
Nathaniel Nicandro 2019-07-08 21:03:12 -05:00
parent fb0317acdd
commit 0f01a2a2ed
1 changed files with 11 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
ob-jupyter.el
View file

@ -449,15 +449,21 @@ name jupyter-LANG will be aliased to the Jupyter functions."
(defun org-babel-jupyter-aliases-from-kernelspecs (&optional refresh) (defun org-babel-jupyter-aliases-from-kernelspecs (&optional refresh)
"Make language aliases based on the available kernelspecs. "Make language aliases based on the available kernelspecs.
For all kernels returned by `jupyter-available-kernelspecs', make For all kernelspecs returned by `jupyter-available-kernelspecs',
a language alias for the kernel language if one does not already make a language alias for the kernel language if one does not
exist. The alias is created with already exist. The alias is created with
`org-babel-jupyter-make-language-alias'. `org-babel-jupyter-make-language-alias'.
Optional argument REFRESH has the same meaning as in Optional argument REFRESH has the same meaning as in
`jupyter-available-kernelspecs'." `jupyter-available-kernelspecs'."
(unless (file-remote-p default-directory)
;; Keep this function on `org-mode-hook' until we know for sure that at
;; least the local kernelspecs have language aliases.
(remove-hook 'org-mode-hook #'org-babel-jupyter-aliases-from-kernelspecs))
(cl-loop (cl-loop
for (kernel . (_dir . spec)) in (jupyter-available-kernelspecs refresh) with specs = (with-demoted-errors "Error retrieving kernelspecs: %S"
(jupyter-available-kernelspecs refresh))
for (kernel . (_dir . spec)) in specs
for lang = (plist-get spec :language) for lang = (plist-get spec :language)
unless (member lang languages) collect lang into languages and unless (member lang languages) collect lang into languages and
do (org-babel-jupyter-make-language-alias kernel lang) do (org-babel-jupyter-make-language-alias kernel lang)
@ -503,7 +509,7 @@ mapped to their appropriate minted language in
;;; Hook into `org' ;;; Hook into `org'
(org-babel-jupyter-aliases-from-kernelspecs) (add-hook 'org-mode-hook #'org-babel-jupyter-aliases-from-kernelspecs)
(add-hook 'org-export-before-processing-hook #'org-babel-jupyter-setup-export) (add-hook 'org-export-before-processing-hook #'org-babel-jupyter-setup-export)
(add-hook 'org-export-before-parsing-hook #'org-babel-jupyter-strip-ansi-escapes) (add-hook 'org-export-before-parsing-hook #'org-babel-jupyter-strip-ansi-escapes)