tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

lisp/ob-julia.el: Fix session support for Julia 

* ob-julia.el (org-babel-julia-evaluate-session, commentary): Add line
to initialize ESS so that Julia sessions work.  Also added text in
commentary about Julia packages that sessions require.  Fix
contributed by Stephen Eglen.  See discussion:
https://stat.ethz.ch/pipermail/ess-help/2022-August/013113.html.
This commit is contained in:
Eric S Fraga 2022-08-16 17:03:33 +01:00 committed by Ihor Radchenko
parent 70a311b001
commit 4dff42f6a6
No known key found for this signature in database
GPG Key ID: 6470762A7DA11D8B
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/ob-julia.el
View File

@ -26,6 +26,9 @@
;; Org-Babel support for evaluating julia code ;; Org-Babel support for evaluating julia code
;; ;;
;; Based on ob-R.el by Eric Schulte and Dan Davison. ;; Based on ob-R.el by Eric Schulte and Dan Davison.
;;
;; Session support requires the installation of the DataFrames and CSV
;; Julia packages.
;;; Code: ;;; Code:
(require 'cl-lib) (require 'cl-lib)
@ -62,6 +65,7 @@
(defvar ess-current-process-name) ; dynamically scoped (defvar ess-current-process-name) ; dynamically scoped
(defvar ess-local-process-name) ; dynamically scoped (defvar ess-local-process-name) ; dynamically scoped
(defvar ess-eval-visibly-p) ; dynamically scoped (defvar ess-eval-visibly-p) ; dynamically scoped
(defvar ess-local-customize-alist); dynamically scoped
(defun org-babel-edit-prep:julia (info) (defun org-babel-edit-prep:julia (info)
(let ((session (cdr (assq :session (nth 2 info))))) (let ((session (cdr (assq :session (nth 2 info)))))
(when (and session (when (and session
@ -281,7 +285,8 @@ last statement in BODY, as elisp."
(value (value
(with-temp-buffer (with-temp-buffer
(insert (org-babel-chomp body)) (insert (org-babel-chomp body))
(let ((ess-local-process-name (let ((ess-local-customize-alist t)
(ess-local-process-name
(process-name (get-buffer-process session))) (process-name (get-buffer-process session)))
(ess-eval-visibly-p nil)) (ess-eval-visibly-p nil))
(ess-eval-buffer nil))) (ess-eval-buffer nil)))