diff options
Diffstat (limited to 'lisp/org/ob.el')
-rw-r--r-- | lisp/org/ob.el | 14 |
1 files changed, 5 insertions, 9 deletions
diff --git a/lisp/org/ob.el b/lisp/org/ob.el index 7a9cd0d4bfb..724571481f7 100644 --- a/lisp/org/ob.el +++ b/lisp/org/ob.el @@ -2547,18 +2547,14 @@ Emacs shutdown.")) Passes PREFIX and SUFFIX directly to `make-temp-file' with the value of `temporary-file-directory' temporarily set to the value of `org-babel-temporary-directory'." - (if (file-remote-p default-directory) - (make-temp-file - (concat (file-remote-p default-directory) - (expand-file-name - prefix temporary-file-directory) - nil suffix)) - (let ((temporary-file-directory + (let ((temporary-file-directory + (if (file-remote-p default-directory) + (concat (file-remote-p default-directory) "/tmp") (or (and (boundp 'org-babel-temporary-directory) (file-exists-p org-babel-temporary-directory) org-babel-temporary-directory) - temporary-file-directory))) - (make-temp-file prefix nil suffix)))) + temporary-file-directory)))) + (make-temp-file prefix nil suffix))) (defun org-babel-remove-temporary-directory () "Remove `org-babel-temporary-directory' on Emacs shutdown." |