changeset 43366:512ab477b395

(Vmouse_highlight): New variable. (syms_of_frame): DEFVAR_LISP it.
author Kim F. Storm <storm@cua.dk>
date Sat, 16 Feb 2002 23:53:22 +0000
parents bcde2eb5438e
children 7d02c2aeb8fb
files src/frame.c
diffstat 1 files changed, 9 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/frame.c	Sat Feb 16 19:54:44 2002 +0000
+++ b/src/frame.c	Sat Feb 16 23:53:22 2002 +0000
@@ -79,6 +79,7 @@
 Lisp_Object Vterminal_frame;
 Lisp_Object Vdefault_frame_alist;
 Lisp_Object Vmouse_position_function;
+Lisp_Object Vmouse_highlight;
 
 static void
 set_menu_bar_lines_1 (window, n)
@@ -2535,6 +2536,14 @@
 which need to do mouse handling at the Lisp level.  */);
   Vmouse_position_function = Qnil;
 
+  DEFVAR_LISP ("mouse-highlight", &Vmouse_highlight,
+	       doc: /* If non-nil, clickable text is highlighted when mouse is over it.  
+If the value is an integer, highlighting is only shown after moving the
+mouse, while keyboard input turns off the highlight even when the mouse
+is over the clickable text.  However, the mouse shape still indicates
+when the mouse is over clickable text.  */);
+  Vmouse_highlight = make_number (1);
+
   DEFVAR_KBOARD ("default-minibuffer-frame", Vdefault_minibuffer_frame,
 		 doc: /* Minibufferless frames use this frame's minibuffer.