diff --git a/src/backend/modern.lisp b/src/backend/modern.lisp
index 8d79ef9..5e1be3b 100644
--- a/src/backend/modern.lisp
+++ b/src/backend/modern.lisp
@@ -128,8 +128,7 @@ as a fallback when a keyword is not in *named-colors*.")
   (backend-write b (format nil "~C[?1006h" #\Esc))  ; SGR mouse
   (backend-write b (format nil "~C[?2004h" #\Esc))  ; bracketed paste
   (backend-write b (format nil "~C[?u" #\Esc))      ; kitty keyboard
-  (cursor-style b :block :blink t)
-  (cursor-show b)
+  (cursor-hide b)
   (finish-output (backend-output-stream b))
   b)