Mercurial > emacs
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 |