(mouse-show-mark): Use display-mouse-p, not display-graphic-p,

to decide whether to move point or use the highlighting.

2 files changed, 7 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d4af5ae71ad..7097d45e1f3 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2002-03-01  Eli Zaretskii  <eliz@is.elta.co.il>
+
+        * mouse.el (mouse-show-mark): Use display-mouse-p, not
+        display-graphic-p, to decide whether to move point or use the
+        highlighting.
+
 2002-02-28  Colin Walters  <walters@verbum.org>
 
         * eshell/esh-var.el (eshell-parse-variable-ref): Use
diff --git a/lisp/mouse.el b/lisp/mouse.el
index 9ac786a5cb7..9d9bee17005 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -1007,7 +1007,7 @@ If DIR is positive skip forward; if negative, skip backward."
 (defun mouse-show-mark ()
   (if transient-mark-mode
       (delete-overlay mouse-drag-overlay)
-    (if (not (display-graphic-p))
+    (if (not (display-mouse-p))
         (save-excursion
           (goto-char (mark t))
           (sit-for 1))