diff options
author | Dan Davison <davison@stats.ox.ac.uk> | 2010-09-22 21:52:48 +0100 |
---|---|---|
committer | Dan Davison <davison@stats.ox.ac.uk> | 2010-09-22 22:10:13 +0100 |
commit | c33c313ee179d95237b7d06e276cbbded6bc9b54 (patch) | |
tree | 2fca101a34c17e5ed415eabd445d9aa72cbf123e | |
parent | 469021c2f9d9dd2e89dc60072a2f43528a6555bd (diff) | |
download | org-mode-c33c313ee179d95237b7d06e276cbbded6bc9b54.tar.gz |
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
-rw-r--r-- | lisp/ob-clojure.el | 2 | ||||
-rw-r--r-- | lisp/ob-octave.el | 2 | ||||
-rw-r--r-- | lisp/ob-python.el | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/lisp/ob-clojure.el b/lisp/ob-clojure.el index c90adf2..43a069c 100644 --- a/lisp/ob-clojure.el +++ b/lisp/ob-clojure.el @@ -261,7 +261,7 @@ repl buffer." " ")))) (case result-type (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 cmd (format diff --git a/lisp/ob-octave.el b/lisp/ob-octave.el index b25ab8a..59f6819 100644 --- a/lisp/ob-octave.el +++ b/lisp/ob-octave.el @@ -178,7 +178,7 @@ value of the last statement in BODY, as elisp." org-babel-octave-shell-command))) (case result-type (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 cmd (format org-babel-octave-wrapper-method body diff --git a/lisp/ob-python.el b/lisp/ob-python.el index f73da65..c172756 100644 --- a/lisp/ob-python.el +++ b/lisp/ob-python.el @@ -267,7 +267,7 @@ last statement in BODY, as elisp." (if (or (member "code" result-params) (member "pp" result-params)) 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 (session org-babel-python-eoe-indicator t body) (let ((comint-process-echoes nil)) |