[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs-24 r117106: ob-screen tempfile fixes
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] emacs-24 r117106: ob-screen tempfile fixes |
Date: |
Mon, 12 May 2014 06:09:58 +0000 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 117106
revision-id: address@hidden
parent: address@hidden
fixes bug: http://debbugs.gnu.org/17416
author: Eric Schulte <address@hidden>
committer: Glenn Morris <address@hidden>
branch nick: emacs-24
timestamp: Sun 2014-05-11 23:09:43 -0700
message:
ob-screen tempfile fixes
* lisp/org/ob-screen.el (org-babel-screen-session-write-temp-file)
(org-babel-screen-test): Use unpredictable names for temporary files.
modified:
lisp/org/ChangeLog changelog-20091113204419-o5vbwnq5f7feedwu-8688
lisp/org/ob-screen.el obscreen.el-20100719092623-qqnigi7w9j01gc4a-26
=== modified file 'lisp/org/ChangeLog'
--- a/lisp/org/ChangeLog 2014-05-10 22:09:03 +0000
+++ b/lisp/org/ChangeLog 2014-05-12 06:09:43 +0000
@@ -1,3 +1,9 @@
+2014-05-12 Eric Schulte <address@hidden>
+
+ * ob-screen.el (org-babel-screen-session-write-temp-file)
+ (org-babel-screen-test):
+ Use unpredictable names for temporary files. (Bug#17416)
+
2014-04-22 Aaron Ecay <address@hidden>
* org-src.el (org-edit-src-exit): Place an undo boundary before
=== modified file 'lisp/org/ob-screen.el'
--- a/lisp/org/ob-screen.el 2014-01-01 07:43:34 +0000
+++ b/lisp/org/ob-screen.el 2014-05-12 06:09:43 +0000
@@ -106,7 +106,7 @@
(defun org-babel-screen-session-write-temp-file (session body)
"Save BODY in a temp file that is named after SESSION."
- (let ((tmpfile (concat "/tmp/screen.org-babel-session-" session)))
+ (let ((tmpfile (org-babel-temp-file "screen-")))
(with-temp-file tmpfile
(insert body)
@@ -121,7 +121,7 @@
(interactive)
(let* ((session "org-babel-testing")
(random-string (format "%s" (random 99999)))
- (tmpfile "/tmp/org-babel-screen.test")
+ (tmpfile (org-babel-temp-file "ob-screen-test-"))
(body (concat "echo '" random-string "' > " tmpfile "\nexit\n"))
process tmp-string)
(org-babel-execute:screen body org-babel-default-header-args:screen)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs-24 r117106: ob-screen tempfile fixes,
Glenn Morris <=