changeset 42918:9b06036a8c5e

(syms_of_w32fns): Initialize w32_visible_system_caret_hwnd.
author Jason Rumney <jasonr@gnu.org>
date Wed, 23 Jan 2002 21:52:41 +0000
parents ec2db12c7670
children 2a546583564f
files src/w32fns.c
diffstat 1 files changed, 5 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/src/w32fns.c	Wed Jan 23 17:46:44 2002 +0000
+++ b/src/w32fns.c	Wed Jan 23 21:52:41 2002 +0000
@@ -321,7 +321,7 @@
 extern int w32_system_caret_y;
 extern int w32_use_visible_system_caret;
 
-HWND w32_visible_system_caret_hwnd;
+static HWND w32_visible_system_caret_hwnd;
 
 
 /* Error if we are not connected to MS-Windows.  */
@@ -4879,9 +4879,9 @@
       /* Relinquish the system caret.  */
       if (w32_system_caret_hwnd)
 	{
-	  DestroyCaret ();
+	  w32_visible_system_caret_hwnd = NULL;
 	  w32_system_caret_hwnd = NULL;
-	  w32_visible_system_caret_hwnd = NULL;
+	  DestroyCaret ();
 	}
     case WM_MOVE:
     case WM_SIZE:
@@ -14467,6 +14467,8 @@
   track_mouse_event_fn = GetProcAddress (user32_lib, "TrackMouseEvent");
   track_mouse_window = NULL;
 
+  w32_visible_system_caret_hwnd = NULL;
+
   /* The section below is built by the lisp expression at the top of the file,
      just above where these variables are declared.  */
   /*&&& init symbols here &&&*/