Mercurial > emacs
comparison lisp/frame.el @ 30013:10ee2ede881c
(blink-cursor): Default to nil if not running under
a window-system.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Mon, 03 Jul 2000 16:00:33 +0000 |
parents | 356975f21b18 |
children | 7ab1a3106972 |
comparison
equal
deleted
inserted
replaced
30012:c4958e8c427f | 30013:10ee2ede881c |
---|---|
1070 blink-cursor-delay | 1070 blink-cursor-delay |
1071 'blink-cursor-start)) | 1071 'blink-cursor-start)) |
1072 (setq blink-cursor-mode t)) | 1072 (setq blink-cursor-mode t)) |
1073 (internal-show-cursor nil t)))) | 1073 (internal-show-cursor nil t)))) |
1074 | 1074 |
1075 (defcustom blink-cursor (not (eq system-type 'ms-dos)) | 1075 (defcustom blink-cursor (unless (eq system-type 'ms-dos) |
1076 window-system) | |
1076 "*Non-nil means blinking cursor mode is active." | 1077 "*Non-nil means blinking cursor mode is active." |
1077 :tag "Blinking cursor" | 1078 :tag "Blinking cursor" |
1078 :type 'boolean | 1079 :type 'boolean |
1079 :group 'cursor | 1080 :group 'cursor |
1080 :set #'(lambda (symbol value) | 1081 :set #'(lambda (symbol value) |