diff lisp/ps-print.el @ 85987:6a97e5e13b22

If ps-lpr-switches is not a list, force it to be one.
author Vinicius Jose Latorre <viniciusjl@ig.com.br>
date Fri, 09 Nov 2007 15:23:07 +0000
parents 3b291390be13
children 915f18d633ac
line wrap: on
line diff
--- a/lisp/ps-print.el	Fri Nov 09 13:06:05 2007 +0000
+++ b/lisp/ps-print.el	Fri Nov 09 15:23:07 2007 +0000
@@ -10,11 +10,11 @@
 ;; Maintainer: Kenichi Handa <handa@m17n.org> (multi-byte characters)
 ;;	Vinicius Jose Latorre <viniciusjl@ig.com.br>
 ;; Keywords: wp, print, PostScript
-;; Version: 6.8
+;; Version: 6.8.1
 ;; X-URL: http://www.emacswiki.org/cgi-bin/wiki/ViniciusJoseLatorre
 
-(defconst ps-print-version "6.8"
-  "ps-print.el, v 6.8 <2007/10/26 vinicius>
+(defconst ps-print-version "6.8.1"
+  "ps-print.el, v 6.8.1 <2007/11/09 vinicius>
 
 Vinicius's last change version -- this file may have been edited as part of
 Emacs without changes to the version number.  When reporting bugs, please also
@@ -6844,7 +6844,9 @@
 				    (and (boundp 'printer-name)
 					 (symbol-value 'printer-name))))
 	       (ps-lpr-switches
-		(append ps-lpr-switches
+		(append (if (listp ps-lpr-switches)
+			    ps-lpr-switches
+			  (list ps-lpr-switches))
 			(and (stringp ps-printer-name)
 			     (string< "" ps-printer-name)
 			     (list (concat