From 9dbf2cd61677a6819dd2f4973c18b35c185b841e Mon Sep 17 00:00:00 2001 From: "Kim F. Storm" Date: Tue, 1 Jun 2004 23:18:25 +0000 Subject: [PATCH] (blink-cursor-start): Turn cursor off initially so blink starts after blink-cursor-delay rather than 2*blink-cursor-delay. --- lisp/frame.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/frame.el b/lisp/frame.el index 4a5b09ba68a..85b3270a077 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -1297,6 +1297,7 @@ if appropriate. It also arranges to cancel that timer when the next command starts, by installing a pre-command hook." (when (null blink-cursor-timer) (add-hook 'pre-command-hook 'blink-cursor-end) + (internal-show-cursor nil nil) (setq blink-cursor-timer (run-with-timer blink-cursor-interval blink-cursor-interval 'blink-cursor-timer-function)))) -- 2.39.5