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

diff --git a/lisp/textmodes/artist.el b/lisp/textmodes/artist.el
index 46b81efb8b6427bdc12462b4bcdf8d910b08f10f..6920b18045c5ce0db74d6508314edec44c6123fe 100644 (file)
--- a/lisp/textmodes/artist.el
+++ b/lisp/textmodes/artist.el
@@ -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))