diff options
Diffstat (limited to 'generic/tkGrab.c')
| -rw-r--r-- | generic/tkGrab.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tkGrab.c b/generic/tkGrab.c index e825c7b..6a5fac6 100644 --- a/generic/tkGrab.c +++ b/generic/tkGrab.c @@ -552,7 +552,7 @@ Tk_Grab( } else if (grabResult == GrabInvalidTime) { Tcl_SetObjResult(interp, Tcl_NewStringObj( "grab failed: invalid time", -1)); - Tcl_SetErrorCode(interp, "TK", "GRAB", "BADTIME", NULL); + Tcl_SetErrorCode(interp, "TK", "GRAB", "BAD_TIME", NULL); } else { Tcl_SetObjResult(interp, Tcl_ObjPrintf( "grab failed for unknown reason (code %d)", grabResult)); |