diff options
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/proof-syntax.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/generic/proof-syntax.el b/generic/proof-syntax.el index 1d454523..651c3578 100644 --- a/generic/proof-syntax.el +++ b/generic/proof-syntax.el @@ -41,7 +41,10 @@ ;; FIXME 2: use defface here (defun proof-have-color () - ()) + "Do we have support for colour?" + (or (and (fboundp 'device-class) + (eq (device-class (frame-device)) 'color)) + (and (fboundp 'x-display-color-p) (x-display-color-p)))) (defvar font-lock-declaration-name-face (progn |