diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-10-15 22:19:28 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-10-15 22:19:28 (GMT) |
commit | c96877b84aa6bfecda4b6c936b0fae84fbb4b009 (patch) | |
tree | 3cb083767d99cd0f0de4ba4689ac8e3b71b15130 /macosx | |
parent | 0425ee56bedbf954c2d61b4c69d7d63d47967c22 (diff) | |
download | tk-c96877b84aa6bfecda4b6c936b0fae84fbb4b009.zip tk-c96877b84aa6bfecda4b6c936b0fae84fbb4b009.tar.gz tk-c96877b84aa6bfecda4b6c936b0fae84fbb4b009.tar.bz2 |
Fix [6bbe12f29d]: MacSystrayDestroy() should be a Tcl_CmdDeleteProc
Diffstat (limited to 'macosx')
-rw-r--r-- | macosx/tkMacOSXSysTray.c | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/macosx/tkMacOSXSysTray.c b/macosx/tkMacOSXSysTray.c index 3de6216..76186cc 100644 --- a/macosx/tkMacOSXSysTray.c +++ b/macosx/tkMacOSXSysTray.c @@ -162,8 +162,7 @@ typedef TkStatusItem** StatusItemInfo; static void MacSystrayDestroy( - void *clientData, - TCL_UNUSED(Tcl_Interp *)) + void *clientData) { StatusItemInfo info = (StatusItemInfo)clientData; if (info) { @@ -481,7 +480,7 @@ MacSystrayInit(Tcl_Interp *interp) *info = 0; Tcl_CreateObjCommand(interp, "::tk::systray::_systray", MacSystrayObjCmd, info, - (Tcl_CmdDeleteProc *)MacSystrayDestroy); + MacSystrayDestroy); Tcl_CreateObjCommand(interp, "::tk::sysnotify::_sysnotify", SysNotifyObjCmd, NULL, NULL); return TCL_OK; } |