# HG changeset patch # User Gerd Moellmann # Date 951401039 0 # Node ID 1ef6cae1619242a670509ac56a75e9627102386f # Parent 99588191815440383f80f4c75a89ac1fa9870857 (show-cursor-in-non-selected-windows): New option. diff -r 995881918154 -r 1ef6cae16192 lisp/frame.el --- a/lisp/frame.el Thu Feb 24 13:55:54 2000 +0000 +++ b/lisp/frame.el Thu Feb 24 14:03:59 2000 +0000 @@ -1096,7 +1096,19 @@ (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