aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGeoff Voelker1999-01-28 04:48:30 +0000
committerGeoff Voelker1999-01-28 04:48:30 +0000
commit416afb32052f252922ed937746580f1e1863cd48 (patch)
tree7bbd0f34899698b768a1f988200f0776cbdf195f
parente7a8ad1fdb56c622496bd0e2e3c82ee307387f0f (diff)
downloademacs-416afb32052f252922ed937746580f1e1863cd48.tar.gz
emacs-416afb32052f252922ed937746580f1e1863cd48.zip
(direct-print-region-helper): Check for printer
being t as well as a string.
-rw-r--r--lisp/dos-w32.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/dos-w32.el b/lisp/dos-w32.el
index 825281b11f8..2d5377ef747 100644
--- a/lisp/dos-w32.el
+++ b/lisp/dos-w32.el
@@ -292,7 +292,7 @@ filesystem mounted on drive Z:, FILESYSTEM could be \"Z:\"."
292 ;; asking command.com to copy the file. 292 ;; asking command.com to copy the file.
293 ;; No action is needed for UNC printer names, which is just as well 293 ;; No action is needed for UNC printer names, which is just as well
294 ;; because `expand-file-name' doesn't support UNC names on MS-DOS. 294 ;; because `expand-file-name' doesn't support UNC names on MS-DOS.
295 (if (not (string-match "^\\\\" printer)) 295 (if (and (stringp printer) (not (string-match "^\\\\" printer)))
296 (setq printer (expand-file-name printer safe-dir))) 296 (setq printer (expand-file-name printer safe-dir)))
297 ;; Handle known programs specially where necessary. 297 ;; Handle known programs specially where necessary.
298 (unwind-protect 298 (unwind-protect