|
@@ -121,7 +121,7 @@ The terminal should shortly flicker."
|
|
(interactive)
|
|
(interactive)
|
|
(let* ((session "org-babel-testing")
|
|
(let* ((session "org-babel-testing")
|
|
(random-string (format "%s" (random 99999)))
|
|
(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"))
|
|
(body (concat "echo '" random-string "' > " tmpfile "\nexit\n"))
|
|
process tmp-string)
|
|
process tmp-string)
|
|
(org-babel-execute:screen body org-babel-default-header-args:screen)
|
|
(org-babel-execute:screen body org-babel-default-header-args:screen)
|