# HG changeset patch
# User Vinicius Jose Latorre <viniciusjl@ig.com.br>
# Date 1194621787 0
# Node ID 6a97e5e13b22b16e475735bda162baf5c43ae53d
# Parent  54f4d44dfa0b0a6d9463b3699da64d495cce6bf5
If ps-lpr-switches is not a list, force it to be one.

diff -r 54f4d44dfa0b -r 6a97e5e13b22 lisp/ChangeLog
--- a/lisp/ChangeLog	Fri Nov 09 13:06:05 2007 +0000
+++ b/lisp/ChangeLog	Fri Nov 09 15:23:07 2007 +0000
@@ -1,3 +1,9 @@
+2007-11-09  Vinicius Jose Latorre  <viniciusjl@ig.com.br>
+
+	* ps-print.el (ps-do-despool): If ps-lpr-switches is not a list, force
+	it to be one.
+	(ps-print-version): New version 6.8.1.
+
 2007-11-09  Juanma Barranquero  <lekktu@gmail.com>
 
 	* files.el (enable-local-variables): Doc fix.
@@ -6319,18 +6325,6 @@
 	Replace it with another one which disables undo before calling
 	erase-buffer and then turns it back on if needed.
 
-2007-07-24  Vinicius Jose Latorre  <viniciusjl@ig.com.br>
-
-	* ps-print.el: Problem with foreground and background color when
-	printing a buffer with and without faces.  Reported by Christian
-	Schlauer <cs-muelleimer-rubbish.bin@arcor.de>.
-	(ps-print-version): New version 6.7.5.
-	(ps-default-fg): Change default value to nil, so black color is used
-	when a face does not specify a foreground color.
-	(ps-default-bg): Change default value to nil, so white color is used
-	for background color.
-	(ps-begin-job): Fix code.
-
 2007-07-24  Dan Nicolaescu  <dann@ics.uci.edu>
 
 	* vc-hg.el (vc-hg-revision-completion-table): Temporarily comment out.
diff -r 54f4d44dfa0b -r 6a97e5e13b22 lisp/ps-print.el
--- 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