# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 934718176 0
# Node ID 1bae87a16cdffa06a025e917e7c52d77b4bd6468
# Parent  3aba9b200c5f1a13c3015018c813899b56a358da
(blink-cursor): Don't turn on cursor blinking for
ms-dos.

diff -r 3aba9b200c5f -r 1bae87a16cdf lisp/frame.el
--- a/lisp/frame.el	Sun Aug 15 11:52:16 1999 +0000
+++ b/lisp/frame.el	Sun Aug 15 11:56:16 1999 +0000
@@ -843,7 +843,7 @@
 				     '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