1 files changed, 26 insertions, 1 deletions
diff --git a/win/tkWinPointer.c b/win/tkWinPointer.c
index 8e8e476..e9c94be 100644
--- a/win/tkWinPointer.c
+++ b/win/tkWinPointer.c
@@ -8,7 +8,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tkWinPointer.c,v 1.3 1998/09/14 18:24:01 stanton Exp $
+ * RCS: @(#) $Id: tkWinPointer.c,v 1.4 1999/02/04 21:00:57 stanton Exp $
  */
 
 #include "tkWinInt.h"
@@ -241,6 +241,31 @@ MouseTimerProc(clientData)
 /*
  *----------------------------------------------------------------------
  *
+ * TkWinCancelMouseTimer --
+ *
+ *    If the mouse timer is set, cancel it.
+ *
+ * Results:
+ *    None.
+ *
+ * Side effects:
+ *    May cancel the mouse timer.
+ *
+ *----------------------------------------------------------------------
+ */
+
+void
+TkWinCancelMouseTimer()
+{
+    if (mouseTimerSet) {
+	Tcl_DeleteTimerHandler(mouseTimer);
+	mouseTimerSet = 0;
+    }
+}
+
+/*
+ *----------------------------------------------------------------------
+ *
  * TkGetPointerCoords --
  *
  *	Fetch the position of the mouse pointer.