diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-10-25 21:06:25 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-10-25 21:06:25 (GMT) |
| commit | 0d5336db012f45753abace489f18f0ca299c6961 (patch) | |
| tree | b1bf3280a9046df99226158978502eeb26f5b0a3 /generic/tkGrab.c | |
| parent | e97381a6d921de403516d5b761539a450f4af83c (diff) | |
| parent | 1320b8a2a9c1269a345d44d673a7a35707fbbe9c (diff) | |
| download | tk-core-tip-626.zip tk-core-tip-626.tar.gz tk-core-tip-626.tar.bz2 | |
Merge 9.0core-tip-626
Diffstat (limited to 'generic/tkGrab.c')
| -rw-r--r-- | generic/tkGrab.c | 30 |
1 files changed, 15 insertions, 15 deletions
diff --git a/generic/tkGrab.c b/generic/tkGrab.c index a2be57b..f234161 100644 --- a/generic/tkGrab.c +++ b/generic/tkGrab.c @@ -524,24 +524,24 @@ Tk_Grab( if (grabResult == GrabNotViewable) { Tcl_SetObjResult(interp, Tcl_NewStringObj( "grab failed: window not viewable", TCL_INDEX_NONE)); - Tcl_SetErrorCode(interp, "TK", "GRAB", "UNVIEWABLE", NULL); + Tcl_SetErrorCode(interp, "TK", "GRAB", "UNVIEWABLE", (char *)NULL); } else if (grabResult == AlreadyGrabbed) { alreadyGrabbed: Tcl_SetObjResult(interp, Tcl_NewStringObj( "grab failed: another application has grab", TCL_INDEX_NONE)); - Tcl_SetErrorCode(interp, "TK", "GRAB", "GRABBED", NULL); + Tcl_SetErrorCode(interp, "TK", "GRAB", "GRABBED", (char *)NULL); } else if (grabResult == GrabFrozen) { Tcl_SetObjResult(interp, Tcl_NewStringObj( "grab failed: keyboard or pointer frozen", TCL_INDEX_NONE)); - Tcl_SetErrorCode(interp, "TK", "GRAB", "FROZEN", NULL); + Tcl_SetErrorCode(interp, "TK", "GRAB", "FROZEN", (char *)NULL); } else if (grabResult == GrabInvalidTime) { Tcl_SetObjResult(interp, Tcl_NewStringObj( "grab failed: invalid time", TCL_INDEX_NONE)); - Tcl_SetErrorCode(interp, "TK", "GRAB", "BAD_TIME", NULL); + Tcl_SetErrorCode(interp, "TK", "GRAB", "BAD_TIME", (char *)NULL); } else { Tcl_SetObjResult(interp, Tcl_ObjPrintf( "grab failed for unknown reason (code %d)", grabResult)); - Tcl_SetErrorCode(interp, "TK", "GRAB", "UNKNOWN", NULL); + Tcl_SetErrorCode(interp, "TK", "GRAB", "UNKNOWN", (char *)NULL); } return TCL_ERROR; } @@ -781,12 +781,12 @@ TkPointerEvent( if ((eventPtr->type == MotionNotify) && !appGrabbed) { - /* - * Warp the mouse pointer with respect to window dispPtr->warpWindow - * if such a window was set in HandleEventGenerate. - */ + /* + * Warp the mouse pointer with respect to window dispPtr->warpWindow + * if such a window was set in HandleEventGenerate. + */ - TkDoWarpWrtWin(dispPtr); + TkDoWarpWrtWin(dispPtr); } if (!appGrabbed) { @@ -820,12 +820,12 @@ TkPointerEvent( return 0; } - /* - * Warp the mouse pointer with respect to window dispPtr->warpWindow - * if such a window was set in HandleEventGenerate. - */ + /* + * Warp the mouse pointer with respect to window dispPtr->warpWindow + * if such a window was set in HandleEventGenerate. + */ - TkDoWarpWrtWin(dispPtr); + TkDoWarpWrtWin(dispPtr); return 1; } |