diff options
Diffstat (limited to 'win/tkWinMenu.c')
| -rw-r--r-- | win/tkWinMenu.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/win/tkWinMenu.c b/win/tkWinMenu.c index 0955de1..26f08f4 100644 --- a/win/tkWinMenu.c +++ b/win/tkWinMenu.c @@ -335,7 +335,7 @@ TkpNewMenu( if (winMenuHdl == NULL) { Tcl_SetObjResult(menuPtr->interp, Tcl_NewStringObj( "No more menus can be allocated.", -1)); - Tcl_SetErrorCode(interp, "TK", "MENU", "SYSTEM_RESOURCES", NULL); + Tcl_SetErrorCode(menuPtr->interp, "TK", "MENU", "SYSTEM_RESOURCES", NULL); return TCL_ERROR; } |