lang/org: add jupyter support to eval handler

This commit is contained in:
Henrik Lissner 2020-08-07 20:14:27 -04:00
parent 4cbc2abb09
commit 3b13105e0e
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -8,13 +8,18 @@
if (save-excursion (goto-char pos) (org-in-src-block-p t))
return (goto-char pos)))
(message "Nothing to evaluate at point")
(org-babel-where-is-src-block-head)
(let ((beg (max beg (match-beginning 5)))
(end (min end (match-end 5)))
(major-mode
(org-src-get-lang-mode (or (org-eldoc-get-src-lang)
(let ((info (org-babel-get-src-block-info t))
(beg (max beg (match-beginning 5)))
(end (min end (match-end 5))))
(cond
((and (string-prefix-p "jupyter-" (car info))
(require 'jupyter nil t))
(jupyter-eval-region beg end))
((let ((major-mode
(org-src-get-lang-mode
(or (org-eldoc-get-src-lang)
(user-error "No lang specified for this src block")))))
(+eval/region beg end)))))
(+eval/region beg end))))))))
;;;###autoload