summaryrefslogtreecommitdiff
path: root/lisp/hilit-chg.el
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2000-05-25 16:59:22 +0000
committerEli Zaretskii <eliz@gnu.org>2000-05-25 16:59:22 +0000
commite7a903e81f21db5fc041c9f10bf7821aeb3bcd3f (patch)
tree4bc468ec30956acf1ed2cb5ebdd8107284ae032c /lisp/hilit-chg.el
parent3351481016877a05a9db156d4dde17f6b5c82063 (diff)
downloademacs-e7a903e81f21db5fc041c9f10bf7821aeb3bcd3f.tar.gz
(highlight-changes-mode): Ask about color or
grayscale support, not about window-system.
Diffstat (limited to 'lisp/hilit-chg.el')
-rw-r--r--lisp/hilit-chg.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/hilit-chg.el b/lisp/hilit-chg.el
index c7a0586aa44..d254cb8de6c 100644
--- a/lisp/hilit-chg.el
+++ b/lisp/hilit-chg.el
@@ -684,7 +684,8 @@ highlight-changes-toggle-hook - when entering active or passive state
highlight-changes-disable-hook - when turning off Highlight Changes mode.
"
(interactive "P")
- (if window-system
+ (if (or (display-color-p)
+ (and (fboundp 'x-display-grayscale-p) (x-display-grayscale-p)))
(let ((was-on highlight-changes-mode)
(new-highlight-changes-mode
(cond
@@ -717,7 +718,7 @@ highlight-changes-disable-hook - when turning off Highlight Changes mode.
(run-hooks 'highlight-changes-disable-hook)
(hilit-chg-clear))
)
- (message "Highlight Changes mode only works when using a window system"))
+ (message "Highlight Changes mode requires color or grayscale display"))
)