babel: Make temp file names consistent
* ob-python.el (org-babel-python-evaluate-session): Make temp file names consistent * ob-octave.el (org-babel-octave-evaluate-external-process): Make temp file names consistent * ob-clojure.el (org-babel-clojure-evaluate-external-process): Make temp file names consistent
This commit is contained in:
parent
469021c2f9
commit
c33c313ee1
|
@ -261,7 +261,7 @@ repl buffer."
|
||||||
" "))))
|
" "))))
|
||||||
(case result-type
|
(case result-type
|
||||||
(output (org-babel-eval cmd body))
|
(output (org-babel-eval cmd body))
|
||||||
(value (let* ((tmp-file (org-babel-temp-file "clojure-results-")))
|
(value (let* ((tmp-file (org-babel-temp-file "clojure-")))
|
||||||
(org-babel-eval
|
(org-babel-eval
|
||||||
cmd
|
cmd
|
||||||
(format
|
(format
|
||||||
|
|
|
@ -178,7 +178,7 @@ value of the last statement in BODY, as elisp."
|
||||||
org-babel-octave-shell-command)))
|
org-babel-octave-shell-command)))
|
||||||
(case result-type
|
(case result-type
|
||||||
(output (org-babel-eval cmd body))
|
(output (org-babel-eval cmd body))
|
||||||
(value (let ((tmp-file (org-babel-temp-file "results-")))
|
(value (let ((tmp-file (org-babel-temp-file "octave-")))
|
||||||
(org-babel-eval
|
(org-babel-eval
|
||||||
cmd
|
cmd
|
||||||
(format org-babel-octave-wrapper-method body
|
(format org-babel-octave-wrapper-method body
|
||||||
|
|
|
@ -267,7 +267,7 @@ last statement in BODY, as elisp."
|
||||||
(if (or (member "code" result-params) (member "pp" result-params))
|
(if (or (member "code" result-params) (member "pp" result-params))
|
||||||
results
|
results
|
||||||
(org-babel-python-table-or-string results)))
|
(org-babel-python-table-or-string results)))
|
||||||
(let ((tmp-file (org-babel-temp-file "python-results-")))
|
(let ((tmp-file (org-babel-temp-file "python-")))
|
||||||
(org-babel-comint-with-output
|
(org-babel-comint-with-output
|
||||||
(session org-babel-python-eoe-indicator t body)
|
(session org-babel-python-eoe-indicator t body)
|
||||||
(let ((comint-process-echoes nil))
|
(let ((comint-process-echoes nil))
|
||||||
|
|
Loading…
Reference in New Issue