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