# HG changeset patch # User Glenn Morris # Date 1208919477 0 # Node ID 46345beb0bacf8414a43e61e1d7f9ad2902ca356 # Parent 5503e811e1306d8fcc3291e3be6ebbdebb827373 (ps-color-device): Drop support for XEmacs < 19.12. diff -r 5503e811e130 -r 46345beb0bac lisp/ps-def.el --- a/lisp/ps-def.el Wed Apr 23 02:57:36 2008 +0000 +++ b/lisp/ps-def.el Wed Apr 23 02:57:57 2008 +0000 @@ -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