From 6018080fa7170653dc77b100363158c78074f2cd Mon Sep 17 00:00:00 2001 From: "Kim F. Storm" Date: Sat, 16 Feb 2002 23:53:22 +0000 Subject: [PATCH] (Vmouse_highlight): New variable. (syms_of_frame): DEFVAR_LISP it. --- src/frame.c | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/src/frame.c b/src/frame.c index 93c68388513..d6789065311 100644 --- a/src/frame.c +++ b/src/frame.c @@ -79,6 +79,7 @@ Lisp_Object Qtty_color_mode; 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 @@ This abnormal hook exists for the benefit of packages like `xt-mouse.el' 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. -- 2.39.5