summaryrefslogtreecommitdiffstats
path: root/generic/tkTextDisp.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-05-12 22:01:40 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-05-12 22:01:40 (GMT)
commitdc847a1c2f0f52c7ba66b37b9cc7a3d4316726a7 (patch)
tree1d241304896401e48b0b0ccad98703678b0b3e0b /generic/tkTextDisp.c
parent4749967fe161376a673a9017b6c5faf1cfc8dea8 (diff)
downloadtk-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.c6
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);