[Emacs-diffs] emacs/lisp/textmodes artist.el

[Chong Yidong]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Chong Yidong <cyd>      09/02/07 21:39:46

Modified files:
        lisp/textmodes : artist.el 

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

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/textmodes/artist.el?cvsroot=emacs&r1=1.44&r2=1.45

Patches:
Index: artist.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/textmodes/artist.el,v
retrieving revision 1.44
retrieving revision 1.45
diff -u -b -r1.44 -r1.45
--- artist.el   5 Jan 2009 03:23:59 -0000       1.44
+++ artist.el   7 Feb 2009 21:39:46 -0000       1.45
@@ -1813,17 +1813,11 @@
 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))