diff options
author | Kevin Walzer <kw@codebykevin.com> | 2020-09-07 12:10:22 (GMT) |
---|---|---|
committer | Kevin Walzer <kw@codebykevin.com> | 2020-09-07 12:10:22 (GMT) |
commit | b5a8d4be5f9b1fd89797aa207537b09d6499033e (patch) | |
tree | 5db2385fedba8445289acdbfc6fb020194211d28 /win | |
parent | 9e7d2ff669e2561f925c5f3f3581f573b0fcba57 (diff) | |
download | tk-b5a8d4be5f9b1fd89797aa207537b09d6499033e.zip tk-b5a8d4be5f9b1fd89797aa207537b09d6499033e.tar.gz tk-b5a8d4be5f9b1fd89797aa207537b09d6499033e.tar.bz2 |
Minor tweak, warnings still present
Diffstat (limited to 'win')
-rw-r--r-- | win/tkWinSysTray.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/win/tkWinSysTray.c b/win/tkWinSysTray.c index f7a222b..2b174fa 100644 --- a/win/tkWinSysTray.c +++ b/win/tkWinSysTray.c @@ -1789,8 +1789,9 @@ WinIcoInit(Tcl_Interp * interp) { GetVersionEx( & info); isWin32s = (info.dwPlatformId == VER_PLATFORM_WIN32s); - Tcl_CreateCommand(interp, "_winico", WinIcoCmd, NULL, (Tcl_CmdDeleteProc * ) WinIcoDestroy); - Tcl_CreateCommand(interp, "_systray", WinSystrayCmd, NULL, NULL); + Tcl_CreateCommand(interp, "_winico", WinIcoCmd, (ClientData)interp, + (Tcl_CmdDeleteProc *) WinIcoDestroy); + Tcl_CreateCommand(interp, "_systray", WinSystrayCmd, (ClientData)interp, NULL); return TCL_OK; } |