diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-09-23 09:33:23 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-09-23 09:33:23 (GMT) |
commit | b4cd4a1bb5b919fb2feb328ca361dfd0dc1cb1bf (patch) | |
tree | f54af83759617e1a32a02544ca53c58e3df5f17f /macosx/tkMacOSXMenu.c | |
parent | 82caf6d6c436099f4b39035766d63ce017ade6b1 (diff) | |
download | tk-b4cd4a1bb5b919fb2feb328ca361dfd0dc1cb1bf.zip tk-b4cd4a1bb5b919fb2feb328ca361dfd0dc1cb1bf.tar.gz tk-b4cd4a1bb5b919fb2feb328ca361dfd0dc1cb1bf.tar.bz2 |
Minor code cleanup (more use of TCL_UNUSED, eol-spacing)
Diffstat (limited to 'macosx/tkMacOSXMenu.c')
-rw-r--r-- | macosx/tkMacOSXMenu.c | 27 |
1 files changed, 12 insertions, 15 deletions
diff --git a/macosx/tkMacOSXMenu.c b/macosx/tkMacOSXMenu.c index b9607d5..7e8b854 100644 --- a/macosx/tkMacOSXMenu.c +++ b/macosx/tkMacOSXMenu.c @@ -364,20 +364,17 @@ static Bool runMenuCommand = true; TkMenuEntry *mePtr = (TkMenuEntry *) [menuItem tag]; if (menuPtr && mePtr) { - Tcl_Interp *interp = menuPtr->interp; - - Tcl_Preserve(interp); - Tcl_Preserve(menuPtr); - - int result = TkInvokeMenu(interp, menuPtr, mePtr->index); - - if (result != TCL_OK && result != TCL_CONTINUE && - result != TCL_BREAK) { - Tcl_AddErrorInfo(interp, "\n (menu invoke)"); - Tcl_BackgroundException(interp, result); - } - Tcl_Release(menuPtr); - Tcl_Release(interp); + Tcl_Interp *interp = menuPtr->interp; + Tcl_Preserve(interp); + Tcl_Preserve(menuPtr); + int result = TkInvokeMenu(interp, menuPtr, mePtr->index); + if (result != TCL_OK && result != TCL_CONTINUE && + result != TCL_BREAK) { + Tcl_AddErrorInfo(interp, "\n (menu invoke)"); + Tcl_BackgroundException(interp, result); + } + Tcl_Release(menuPtr); + Tcl_Release(interp); } } } @@ -517,7 +514,7 @@ static Bool runMenuCommand = true; * Make sure that we can run commands when actually using a menu. * See [412b80fcaf]. */ - + runMenuCommand = true; } |