# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 959273848 0
# Node ID d38a98cddcec1f59be6aff055411fd1ace476524
# Parent  004bedde23fc8db4c194e9b2b8245ebb30ff50c4
(highlight-changes-mode): Ask about color or
grayscale support, not about window-system.

diff -r 004bedde23fc -r d38a98cddcec lisp/hilit-chg.el
--- a/lisp/hilit-chg.el	Thu May 25 16:56:34 2000 +0000
+++ b/lisp/hilit-chg.el	Thu May 25 16:57:28 2000 +0000
@@ -684,7 +684,8 @@
 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 @@
 	  (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"))
   )