summaryrefslogtreecommitdiff
path: root/lisp/ps-print.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/ps-print.el')
-rw-r--r--lisp/ps-print.el11
1 files changed, 5 insertions, 6 deletions
diff --git a/lisp/ps-print.el b/lisp/ps-print.el
index ecd5488f9dc..ce92e4781ef 100644
--- a/lisp/ps-print.el
+++ b/lisp/ps-print.el
@@ -1462,12 +1462,11 @@ Please send all bug fixes and enhancements to
(or (featurep 'lisp-float-type)
(error "`ps-print' requires floating point support"))
-(let ((case-fold-search t))
- (cond ((featurep 'xemacs))
- (t
- (unless (and (boundp 'emacs-major-version)
- (>= emacs-major-version 22))
- (error "`ps-print' only supports Emacs 22 and higher")))))
+(if (featurep 'xemacs)
+ ()
+ (unless (and (boundp 'emacs-major-version)
+ (>= emacs-major-version 22))
+ (error "`ps-print' only supports Emacs 22 and higher")))
;; GNU Emacs