From e4f98ad3c65b83a8d49ec2f9c2657758fcb250a6 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Mon, 3 Jul 2000 16:01:31 +0000 Subject: [PATCH] (blink-cursor): Default to nil if not running under a window-system. --- lisp/ChangeLog | 3 +++ lisp/frame.el | 3 ++- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 2efa91c95a1..8066815152a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2000-07-03 Gerd Moellmann + * frame.el (blink-cursor): Default to nil if not running under + a window-system. + * faces.el (face-spec-set): Ignore invalid attributes like 20.x. (face-x-resources): Remove duplicate entry for :font. diff --git a/lisp/frame.el b/lisp/frame.el index e3925d2c6ca..03b9bc6e65e 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -1072,7 +1072,8 @@ window blinks." (setq blink-cursor-mode t)) (internal-show-cursor nil t)))) -(defcustom blink-cursor (not (eq system-type 'ms-dos)) +(defcustom blink-cursor (unless (eq system-type 'ms-dos) + window-system) "*Non-nil means blinking cursor mode is active." :tag "Blinking cursor" :type 'boolean -- 2.39.2