diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-05-12 22:01:40 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-05-12 22:01:40 (GMT) |
commit | dc847a1c2f0f52c7ba66b37b9cc7a3d4316726a7 (patch) | |
tree | 1d241304896401e48b0b0ccad98703678b0b3e0b /generic/tkTextDisp.c | |
parent | 4749967fe161376a673a9017b6c5faf1cfc8dea8 (diff) | |
download | tk-dc847a1c2f0f52c7ba66b37b9cc7a3d4316726a7.zip tk-dc847a1c2f0f52c7ba66b37b9cc7a3d4316726a7.tar.gz tk-dc847a1c2f0f52c7ba66b37b9cc7a3d4316726a7.tar.bz2 |
More alphabetizing Tk options. More type-cast improvements
Diffstat (limited to 'generic/tkTextDisp.c')
-rw-r--r-- | generic/tkTextDisp.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tkTextDisp.c b/generic/tkTextDisp.c index 2301f49..303c3d5 100644 --- a/generic/tkTextDisp.c +++ b/generic/tkTextDisp.c @@ -3087,14 +3087,14 @@ AsyncUpdateLineMetrics( if (textPtr->afterSyncCmd) { int code; Tcl_CancelIdleCall(TkTextRunAfterSyncCmd, textPtr); - Tcl_Preserve((ClientData) textPtr->interp); + Tcl_Preserve(textPtr->interp); code = Tcl_EvalObjEx(textPtr->interp, textPtr->afterSyncCmd, TCL_EVAL_GLOBAL); if (code == TCL_ERROR) { Tcl_AddErrorInfo(textPtr->interp, "\n (text sync)"); Tcl_BackgroundException(textPtr->interp, TCL_ERROR); } - Tcl_Release((ClientData) textPtr->interp); + Tcl_Release(textPtr->interp); Tcl_DecrRefCount(textPtr->afterSyncCmd); textPtr->afterSyncCmd = NULL; } @@ -6459,7 +6459,7 @@ TkTextScanCmd( dInfoPtr->scanMarkY = y; } else { Tcl_SetObjResult(interp, Tcl_ObjPrintf( - "bad scan option \"%s\": must be mark or dragto", + "bad scan option \"%s\": must be dragto or mark", Tcl_GetString(objv[2]))); Tcl_SetErrorCode(interp, "TCL", "LOOKUP", "INDEX", "scan option", Tcl_GetString(objv[2]), NULL); |