lang/org: add jupyter support to eval handler
This commit is contained in:
parent
4cbc2abb09
commit
3b13105e0e
1 changed files with 12 additions and 7 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue