From ae7516b0e1a98b2c3a2d2d88b38e91e8e01926e1 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Sun, 23 Dec 2012 17:47:20 +0100 Subject: [PATCH] Sync `org-babel-temp-file' definition with maint --- lisp/ob-core.el | 14 +++++--------- 1 file changed, 5 insertions(+), 9 deletions(-) diff --git a/lisp/ob-core.el b/lisp/ob-core.el index 9d62ae8ee..9e4c8b1ce 100644 --- a/lisp/ob-core.el +++ b/lisp/ob-core.el @@ -2585,18 +2585,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."