Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-17 10:27:41 +00:00
Code Issues Projects Releases Packages Wiki Activity

(artist-system): Allow make-temp-file to use temporary-file-directory.

Browse source
This commit is contained in:
Chong Yidong 2009-02-07 21:39:46 +00:00
parent e2a42dd50e
commit e3fd4ebfb1
1 changed files with 2 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lisp/textmodes/artist.el
View file

@ -1813,17 +1813,11 @@ Optional args PROGRAM-ARGS are arguments to PROGRAM.
Return a list (RETURN-CODE STDOUT STDERR)."
(save-excursion
(let* ((tmp-stdin-file-name (if stdin
(make-temp-file
(concat (file-name-as-directory
(or (getenv "TMPDIR") "/tmp"))
"artist-stdin."))
(make-temp-file "artist-stdin.")
nil))
(tmp-stdout-buffer (get-buffer-create
(concat "*artist-" program "*")))
(tmp-stderr-file-name (make-temp-file
(concat (file-name-as-directory
(or (getenv "TMPDIR") "/tmp"))
"artist-stdout.")))
(tmp-stderr-file-name (make-temp-file "artist-stdout."))
(binary-process-input nil) ; for msdos
(binary-process-output nil))