[Emacs-diffs] Changes to emacs/lisp/ps-print.el,v

[Vinicius Jose Latorre]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Vinicius Jose Latorre <viniciusjl>      07/11/09 15:34:03

Index: ps-print.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/ps-print.el,v
retrieving revision 1.200
retrieving revision 1.201
diff -u -b -r1.200 -r1.201
--- ps-print.el 9 Nov 2007 15:23:07 -0000       1.200
+++ ps-print.el 9 Nov 2007 15:34:03 -0000       1.201
@@ -1462,12 +1462,11 @@
 (or (featurep 'lisp-float-type)
     (error "`ps-print' requires floating point support"))
 
-(let ((case-fold-search t))
-  (cond ((featurep 'xemacs))
-       (t
+(if (featurep 'xemacs)
+    ()
         (unless (and (boundp 'emacs-major-version)
                      (>= emacs-major-version 22))
-          (error "`ps-print' only supports Emacs 22 and higher")))))
+    (error "`ps-print' only supports Emacs 22 and higher")))
 
 
 ;; GNU Emacs