From 037f214b3a3d2690e266a9e10eab7fa3db0ecc1f Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Wed, 23 Apr 2008 02:57:57 +0000 Subject: (ps-color-device): Drop support for XEmacs < 19.12. --- lisp/ps-def.el | 13 ++----------- 1 file changed, 2 insertions(+), 11 deletions(-) (limited to 'lisp/ps-def.el') diff --git a/lisp/ps-def.el b/lisp/ps-def.el index 72a8bbf3e23..9a972c67877 100644 --- a/lisp/ps-def.el +++ b/lisp/ps-def.el @@ -178,17 +178,8 @@ ;; Return t if the device (which can be changed during an emacs session) ;; can handle colors. - ;; XEmacs change: Need to check for emacs-major-version too. - (if (or (> emacs-major-version 19) - (and (= emacs-major-version 19) - (>= emacs-minor-version 12))) - ;; xemacs >= 19.12 - (defun ps-color-device () - (eq (device-class) 'color)) - ;; xemacs < 19.12 - (setq ps-print-color-p nil) - (defalias 'ps-color-device 'ignore)) - + (defun ps-color-device () + (eq (device-class) 'color)) (defun ps-mapper (extent list) (nconc list -- cgit v1.2.1