From: Geoff Voelker <voelker@cs.washington.edu>
Date: Thu, 28 Jan 1999 04:48:30 +0000 (+0000)
Subject: (direct-print-region-helper): Check for printer
X-Git-Tag: emacs-20.4~736
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=416afb32052f252922ed937746580f1e1863cd48;p=emacs.git

(direct-print-region-helper): Check for printer
being t as well as a string.
---

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:\"."
     ;; asking command.com to copy the file.
     ;; No action is needed for UNC printer names, which is just as well
     ;; because `expand-file-name' doesn't support UNC names on MS-DOS.
-    (if (not (string-match "^\\\\" printer))
+    (if (and (stringp printer) (not (string-match "^\\\\" printer)))
 	(setq printer (expand-file-name printer safe-dir)))
     ;; Handle known programs specially where necessary.
     (unwind-protect