Remove some compat code from ps-print.el

* lisp/ps-print.el (ps-print-color-p): Assume color-values is
fboundp; it always is.

diff --git a/lisp/progmodes/ebnf2ps.el b/lisp/progmodes/ebnf2ps.el
index 48664608ad29ff70b575ae2949c7dd58abc8e8e3..e19726a7eabecbfe6fd28e2efd0387a19823cd3c 100644 (file)
--- a/lisp/progmodes/ebnf2ps.el
+++ b/lisp/progmodes/ebnf2ps.el
@@ -2037,7 +2037,6 @@ It must be a float between 0.0 (top) and 1.0 (bottom)."
   :group 'ebnf2ps)
 
 
-;; Printing color requires x-color-values.
 (defcustom ebnf-color-p t
   "Non-nil means use color."
   :type 'boolean

diff --git a/lisp/ps-print.el b/lisp/ps-print.el
index 2d6c4542cccb4a5cb2be04140c148425569629d2..dad4c8ffbacbc16c1db745209bc47a8b8cf96a8d 100644 (file)
--- a/lisp/ps-print.el
+++ b/lisp/ps-print.el
@@ -2926,9 +2926,8 @@ Either a float or a cons of floats (LANDSCAPE-SIZE . PORTRAIT-SIZE)."
 
 ;;; Colors
 
-;; Printing color requires x-color-values.
 ;;;###autoload
-(defcustom ps-print-color-p (fboundp 'x-color-values)
+(defcustom ps-print-color-p t
   "Specify how buffer's text color is printed.
 
 Valid values are: