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) |