diff options
| -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. |