Attachment "tkText.diff" to
ticket [8e4fb028]
added by
emiliano
2025-12-16 01:26:45.
Index: generic/tkText.c
==================================================================
--- generic/tkText.c
+++ generic/tkText.c
@@ -1529,10 +1529,11 @@
Tcl_WrongNumArgs(interp, 2, objv, "?-command command?");
result = TCL_ERROR;
goto done;
}
if (textPtr->afterSyncCmd) {
+ Tcl_CancelIdleCall(TkTextRunAfterSyncCmd, textPtr);
Tcl_DecrRefCount(textPtr->afterSyncCmd);
}
textPtr->afterSyncCmd = NULL;
TkTextUpdateLineMetrics(textPtr, 0,
TkBTreeNumLines(textPtr->sharedTextPtr->tree, textPtr), -1);
