# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 959273481 0
# Node ID cc07870ddb45e73b35930ab61f7dfc2c150f2967
# Parent  b3592c1e9ddbffd1a672aa6ab09c8a0a411cda45
(apropos-print): Use display-mouse-p instead of
window-system.

diff -r b3592c1e9ddb -r cc07870ddb45 lisp/apropos.el
--- a/lisp/apropos.el	Thu May 25 16:45:32 2000 +0000
+++ b/lisp/apropos.el	Thu May 25 16:51:21 2000 +0000
@@ -518,7 +518,7 @@
 	    symbol item point1 point2)
 	(set-buffer standard-output)
 	(apropos-mode)
-	(if window-system
+	(if (display-mouse-p)
 	    (insert "If you move the mouse over text that changes color,\n"
 		    (substitute-command-keys
 		     "you can click \\[apropos-mouse-follow] to get more information.\n")))