From a4f421b6eb3edb7aa7247e169d6628bae0641b34 Mon Sep 17 00:00:00 2001
From: "jan.nijtmans" <nijtmans@users.sourceforge.net>
Date: Fri, 4 Mar 2022 16:15:04 +0000
Subject: Fix [8d8bb39962]: incorrect notifier initialization in tclXtNotify.c

---
 unix/tclXtNotify.c | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/unix/tclXtNotify.c b/unix/tclXtNotify.c
index a5d92d6..dcd9abe 100644
--- a/unix/tclXtNotify.c
+++ b/unix/tclXtNotify.c
@@ -193,14 +193,11 @@ InitNotifier(void)
 	return;
     }
 
+    memset(&np, 0, sizeof(np));
     np.createFileHandlerProc = CreateFileHandler;
     np.deleteFileHandlerProc = DeleteFileHandler;
     np.setTimerProc = SetTimer;
     np.waitForEventProc = WaitForEvent;
-    np.initNotifierProc = Tcl_InitNotifier;
-    np.finalizeNotifierProc = Tcl_FinalizeNotifier;
-    np.alertNotifierProc = Tcl_AlertNotifier;
-    np.serviceModeHookProc = Tcl_ServiceModeHook;
     Tcl_SetNotifier(&np);
 
     /*
@@ -209,7 +206,6 @@ InitNotifier(void)
      */
 
     initialized = 1;
-    memset(&np, 0, sizeof(np));
     Tcl_CreateExitHandler(NotifierExitHandler, NULL);
 }
 
-- 
cgit v0.12