diff options
| author | Gerd Moellmann <gerd@gnu.org> | 2000-02-25 13:34:08 +0000 |
|---|---|---|
| committer | Gerd Moellmann <gerd@gnu.org> | 2000-02-25 13:34:08 +0000 |
| commit | 1d0a3ef4331dbdbbcc700e740ba6d90efd0ddb02 (patch) | |
| tree | d6ba4e92d3ba0ff326b42200228ac29035168296 /lisp/frame.el | |
| parent | 4ae9a85e9783e65d87061bf74dcc58e6e7a9209d (diff) | |
| download | emacs-1d0a3ef4331dbdbbcc700e740ba6d90efd0ddb02.tar.gz emacs-1d0a3ef4331dbdbbcc700e740ba6d90efd0ddb02.tar.bz2 emacs-1d0a3ef4331dbdbbcc700e740ba6d90efd0ddb02.zip | |
(show-cursor-in-non-selected-windows): New option.
(busy-cursor-delay-seconds): New option.
Diffstat (limited to 'lisp/frame.el')
| -rw-r--r-- | lisp/frame.el | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/lisp/frame.el b/lisp/frame.el index bd153f915f3..d993eeba69f 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -1096,6 +1096,16 @@ itself as a pre-command hook." (set-default symbol value) (setq display-busy-cursor value))) +(defcustom busy-cursor-delay-seconds 1 + "*Seconds to wait before displaying a busy-cursor." + :tag "Busy-cursor delay" + :type 'integer + :group 'cursor + :get #'(lambda (symbol) busy-cursor-delay) + :set #'(lambda (symbol value) + (set-default symbol value) + (setq busy-cursor-delay value))) + (defcustom show-cursor-in-non-selected-windows t "*Non-nil means show a hollow box cursor in non-selected-windows. |