From 175d849778f33e0c4ca185843b99d23fb1203738 Mon Sep 17 00:00:00 2001
From: Simon Tatham <anakin@pobox.com>
Date: Sun, 7 Jan 2001 16:35:44 +0000
Subject: [PATCH] Fix the System Caret so it really is invisible, and the right
 size too.

[originally from svn r842]
---
 window.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/window.c b/window.c
index b9f509e7..8c2d96c9 100644
--- a/window.c
+++ b/window.c
@@ -426,6 +426,7 @@ int WINAPI WinMain(HINSTANCE inst, HINSTANCE prev, LPSTR cmdline, int show) {
         caretbm = CreateBitmap(font_width, font_height, 1, 1, bits);
         sfree(bits);
     }
+    CreateCaret(hwnd, caretbm, font_width, font_height);
 
     /*
      * Initialise the scroll bar.
@@ -1398,7 +1399,7 @@ static LRESULT CALLBACK WndProc (HWND hwnd, UINT message,
 	return 0;
       case WM_SETFOCUS:
 	has_focus = TRUE;
-        CreateCaret(hwnd, caretbm, 0, 0);
+        CreateCaret(hwnd, caretbm, font_width, font_height);
         ShowCaret(hwnd);
         compose_state = 0;
 	term_out();