comparison lisp/dos-w32.el @ 25482:f1d437596538

(direct-print-region-helper): Use temporary-file-directory.
author Eli Zaretskii <eliz@gnu.org>
date Thu, 02 Sep 1999 11:51:42 +0000
parents 76764b2157af
children 89a8ac5aa753
comparison
equal deleted inserted replaced
25481:f26b378dc6a2 25482:f1d437596538
277 (car safe-dirs))) 277 (car safe-dirs)))
278 (tempfile 278 (tempfile
279 (subst-char-in-string 279 (subst-char-in-string
280 ?/ ?\\ 280 ?/ ?\\
281 (make-temp-name 281 (make-temp-name
282 (expand-file-name "EP" (getenv "TMPDIR"))))) 282 (expand-file-name "EP" temporary-file-directory))))
283 ;; capture output for diagnosis 283 ;; capture output for diagnosis
284 (errbuf (list (get-buffer-create " *print-region-helper*") t))) 284 (errbuf (list (get-buffer-create " *print-region-helper*") t)))
285 ;; It seems that we must be careful about the directory name that 285 ;; It seems that we must be careful about the directory name that
286 ;; gets added to the printer port name by write-region when using 286 ;; gets added to the printer port name by write-region when using
287 ;; the standard "PRN" or "LPTx" ports, because the write can fail if 287 ;; the standard "PRN" or "LPTx" ports, because the write can fail if