diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-06-22 09:57:59 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-06-22 09:57:59 (GMT) |
commit | be82a786ad38b52bfc69d58e8d6c7fd76ccdb2d0 (patch) | |
tree | 824368563cac9fa5b4b909b9c56ddaa5950ea6dd /generic/tkMenubutton.c | |
parent | bd318c224a11f1d626073b46597c0d921b658576 (diff) | |
download | tk-be82a786ad38b52bfc69d58e8d6c7fd76ccdb2d0.zip tk-be82a786ad38b52bfc69d58e8d6c7fd76ccdb2d0.tar.gz tk-be82a786ad38b52bfc69d58e8d6c7fd76ccdb2d0.tar.bz2 |
Handle crash in handling "update". More WIP
Diffstat (limited to 'generic/tkMenubutton.c')
-rw-r--r-- | generic/tkMenubutton.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tkMenubutton.c b/generic/tkMenubutton.c index 1843780..c3e91ab 100644 --- a/generic/tkMenubutton.c +++ b/generic/tkMenubutton.c @@ -165,7 +165,7 @@ static char * MenuButtonTextVarProc(ClientData clientData, Tcl_Interp *interp, const char *name1, const char *name2, int flags); static int MenuButtonWidgetObjCmd(ClientData clientData, - Tcl_Interp *interp, int objc, + Tcl_Interp *interp, TkSizeT objc, Tcl_Obj *const objv[]); static int ConfigureMenuButton(Tcl_Interp *interp, TkMenuButton *mbPtr, int objc, @@ -236,7 +236,7 @@ Tk_MenubuttonObjCmd( mbPtr->tkwin = tkwin; mbPtr->display = Tk_Display(tkwin); mbPtr->interp = interp; - mbPtr->widgetCmd = Tcl_CreateObjCommand(interp, + mbPtr->widgetCmd = Tcl_CreateObjCommand2(interp, Tk_PathName(mbPtr->tkwin), MenuButtonWidgetObjCmd, mbPtr, MenuButtonCmdDeletedProc); mbPtr->optionTable = optionTable; @@ -325,7 +325,7 @@ static int MenuButtonWidgetObjCmd( ClientData clientData, /* Information about button widget. */ Tcl_Interp *interp, /* Current interpreter. */ - int objc, /* Number of arguments. */ + TkSizeT objc, /* Number of arguments. */ Tcl_Obj *const objv[]) /* Argument objects. */ { TkMenuButton *mbPtr = (TkMenuButton *)clientData; |