From 06cb954ae30f9e3e032b964df09215a788670aed Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Tue, 9 Aug 2022 22:26:36 +0200 Subject: [PATCH] Remove some compat code from ps-print.el * lisp/ps-print.el (ps-print-color-p): Assume color-values is fboundp; it always is. --- lisp/progmodes/ebnf2ps.el | 1 - lisp/ps-print.el | 3 +-- 2 files changed, 1 insertion(+), 3 deletions(-) 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: -- 2.39.5