From: Stefan Kangas <stefan@marxist.se>
Date: Tue, 9 Aug 2022 20:26:36 +0000 (+0200)
Subject: Remove some compat code from ps-print.el
X-Git-Tag: emacs-29.0.90~1447^2~267
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=06cb954ae30f9e3e032b964df09215a788670aed;p=emacs.git

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 48664608ad2..e19726a7eab 100644
--- 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 2d6c4542ccc..dad4c8ffbac 100644
--- 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: