changeset 60022:67919735cf64

(command-line): Adapt blinking cursor init to changes in frame.el.
author Luc Teirlinck <teirllm@auburn.edu>
date Sat, 12 Feb 2005 18:00:53 +0000
parents d751f08f4c04
children 84f58c749aa7
files lisp/startup.el
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/startup.el	Sat Feb 12 17:58:37 2005 +0000
+++ b/lisp/startup.el	Sat Feb 12 18:00:53 2005 +0000
@@ -735,12 +735,14 @@
               (<= (frame-parameter nil 'tool-bar-lines) 0))
     (tool-bar-mode 1))
 
-  ;; Can't do this init in defcustom because window-system isn't set.
+  ;; Can't do this init in defcustom because the relevant variables
+  ;; are not set.  If you make any changes to the `or' form below,
+  ;; you should also change the corresponding expression in the
+  ;; defcustom in frame.el, or Custom will be badly confused.
   (unless (or noninteractive
 	      emacs-quick-startup
               (eq system-type 'ms-dos)
               (not (memq window-system '(x w32))))
-    (setq-default blink-cursor t)
     (blink-cursor-mode 1))
 
   (unless noninteractive