diff options
| author | Kevin Walzer <kw@codebykevin.com> | 2019-10-07 01:55:54 (GMT) |
|---|---|---|
| committer | Kevin Walzer <kw@codebykevin.com> | 2019-10-07 01:55:54 (GMT) |
| commit | d302af70e9a0b4a3ebb790ecc09bb69f205ba8d0 (patch) | |
| tree | 4fe60659effbaa8a6196f54c4d9d10883ab3491c /macosx/tkMacOSXInit.c | |
| parent | 7bc0447e5cd173b9ac2127aaae1a11fcee6bcd2e (diff) | |
| download | tk-d302af70e9a0b4a3ebb790ecc09bb69f205ba8d0.zip tk-d302af70e9a0b4a3ebb790ecc09bb69f205ba8d0.tar.gz tk-d302af70e9a0b4a3ebb790ecc09bb69f205ba8d0.tar.bz2 | |
tk::mac::RegisterServiceWidget was returning an error when Wish was launched from app bundle; restore to earlier location in app init code
Diffstat (limited to 'macosx/tkMacOSXInit.c')
| -rw-r--r-- | macosx/tkMacOSXInit.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/macosx/tkMacOSXInit.c b/macosx/tkMacOSXInit.c index 27403c1..8a89606 100644 --- a/macosx/tkMacOSXInit.c +++ b/macosx/tkMacOSXInit.c @@ -411,8 +411,6 @@ TkpInit( * is allowed to provide services. */ - Tcl_CreateObjCommand(interp, "::tk::mac::registerServiceWidget", - TkMacOSXRegisterServiceWidgetObjCmd, NULL, NULL); TkMacOSXServices_Init(interp); } @@ -431,6 +429,8 @@ TkpInit( TkMacOSXIconBitmapObjCmd, NULL, NULL); Tcl_CreateObjCommand(interp, "::tk::mac::GetAppPath", TkMacOSXGetAppPathCmd, NULL, NULL); + Tcl_CreateObjCommand(interp, "::tk::mac::registerServiceWidget", + TkMacOSXRegisterServiceWidgetObjCmd, NULL, NULL); return TCL_OK; } |