(blink-cursor): Don't turn on cursor blinking for

ms-dos.

diff --git a/lisp/frame.el b/lisp/frame.el
index 2c9f38d8f985cf8998e5acdf9f975d21108c3202..2116291bb0b2fa979088525917339697fc8557bb 100644 (file)
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -843,7 +843,7 @@ window blinks."
                                     'blink-cursor-start))
          (setq blink-cursor-mode t)))))
 
-(defcustom blink-cursor t
+(defcustom blink-cursor (not (eq system-type 'ms-dos))
   "*Non-nil means blink-cursor-mode is active."
   :tag "Blinking cursor"
   :type 'boolean