From 5b2c5477e0be8c89af94b7bbd7e14153aaf00b32 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Thu, 24 Feb 2000 14:03:59 +0000 Subject: [PATCH] (show-cursor-in-non-selected-windows): New option. --- lisp/frame.el | 14 +++++++++++++- 1 file changed, 13 insertions(+), 1 deletion(-) diff --git a/lisp/frame.el b/lisp/frame.el index 394652d5310..bd153f915f3 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -1096,7 +1096,19 @@ itself as a pre-command hook." (set-default symbol value) (setq display-busy-cursor value))) - + +(defcustom show-cursor-in-non-selected-windows t + "*Non-nil means show a hollow box cursor in non-selected-windows. +If nil, don't show a cursor except in the selected window." + :tag "Cursor in non-selected windows" + :type 'boolean + :group 'cursor + :get #'(lambda (symbol) cursor-in-non-selected-windows) + :set #'(lambda (symbol value) + (set-default symbol value) + (setq cursor-in-non-selected-windows value) + (force-mode-line-update t))) + ;;;; Key bindings -- 2.39.5