From 6320b36270d59a2b1d6be9aa17ce0781ef253373 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 3 Mar 2002 22:22:42 +0000 Subject: [PATCH] (artist-system): Use make-temp-file. --- lisp/textmodes/artist.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/textmodes/artist.el b/lisp/textmodes/artist.el index 12f0e253b5a..d287831681d 100644 --- a/lisp/textmodes/artist.el +++ b/lisp/textmodes/artist.el @@ -1773,14 +1773,14 @@ 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-name + (make-temp-file (concat (file-name-as-directory (or (getenv "TMPDIR") "/tmp")) "artist-stdin.")) nil)) (tmp-stdout-buffer (get-buffer-create (concat "*artist-" program "*"))) - (tmp-stderr-file-name (make-temp-name + (tmp-stderr-file-name (make-temp-file (concat (file-name-as-directory (or (getenv "TMPDIR") "/tmp")) "artist-stdout."))) -- 2.39.5