summaryrefslogtreecommitdiffstats
path: root/unix/tkUnixCursor.c
diff options
context:
space:
mode:
Diffstat (limited to 'unix/tkUnixCursor.c')
-rw-r--r--unix/tkUnixCursor.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/unix/tkUnixCursor.c b/unix/tkUnixCursor.c
index 8a19c7b..5266bde 100644
--- a/unix/tkUnixCursor.c
+++ b/unix/tkUnixCursor.c
@@ -313,7 +313,7 @@ TkGetCursorByName(
Tcl_SetObjResult(interp, Tcl_NewStringObj(
"can't get cursor from a file in a safe interpreter",
-1));
- Tcl_SetErrorCode(interp, "TK", "CURSOR", "SAFE", NULL);
+ Tcl_SetErrorCode(interp, "TK", "SAFE", "CURSOR_FILE", NULL);
cursorPtr = NULL;
goto cleanup;
}