diff lisp/ps-print.el @ 91077:74fda5245f7e

Eliminate the check if ps-print was running on Lucid or Epoch emacsen
author Vinicius Jose Latorre <viniciusjl@ig.com.br>
date Thu, 01 Nov 2007 01:54:48 +0000
parents 2a685ee1b5bb
children a4347a111894
line wrap: on
line diff
--- a/lisp/ps-print.el	Mon Oct 29 23:31:22 2007 +0000
+++ b/lisp/ps-print.el	Thu Nov 01 01:54:48 2007 +0000
@@ -1464,16 +1464,11 @@
     (error "`ps-print' requires floating point support"))
 
 
-(let ((case-fold-search t))
-  (cond ((featurep 'xemacs))
-	((string-match "Lucid" emacs-version)
-	 (error "`ps-print' doesn't support Lucid"))
-	((string-match "Epoch" emacs-version)
-	 (error "`ps-print' doesn't support Epoch"))
-	(t
-	 (unless (and (boundp 'emacs-major-version)
-		      (>= emacs-major-version 23))
-	   (error "`ps-print' only supports Emacs 23 and higher")))))
+(if (featurep 'xemacs)
+    ()
+  (unless (and (boundp 'emacs-major-version)
+	       (>= emacs-major-version 23))
+    (error "`ps-print' only supports Emacs 23 and higher")))
 
 
 (defconst ps-windows-system