diff options
author | dgp <dgp@users.sourceforge.net> | 2014-08-14 16:38:33 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2014-08-14 16:38:33 (GMT) |
commit | 1514e4713faf176127617a5be7e385221df04165 (patch) | |
tree | ea55c1e5e05b97de83c1bd78ae6b1a06de5fadaa | |
parent | 2835a548df11502a21b4210cbd5eda038bbd1793 (diff) | |
parent | 8a81bfc36163fe9b6bb2dcc05ad9a1042388b835 (diff) | |
download | tk-1514e4713faf176127617a5be7e385221df04165.zip tk-1514e4713faf176127617a5be7e385221df04165.tar.gz tk-1514e4713faf176127617a5be7e385221df04165.tar.bz2 |
merge 8.5
-rw-r--r-- | macosx/tkMacOSXMenu.c | 14 |
1 files changed, 11 insertions, 3 deletions
diff --git a/macosx/tkMacOSXMenu.c b/macosx/tkMacOSXMenu.c index 380d3a7..e1cdc76 100644 --- a/macosx/tkMacOSXMenu.c +++ b/macosx/tkMacOSXMenu.c @@ -757,11 +757,19 @@ TkpPostMenu( * to be posted. */ int y) /* The global y-coordinate */ { - NSWindow *win = [NSApp keyWindow]; - if (!win) { + + + /* Get the object that holds this Tk Window.*/ + Tk_Window root; + root = Tk_MainWindow(interp); + if (root == NULL) { return TCL_ERROR; } - + + Drawable d = Tk_WindowId(root); + NSView *rootview = TkMacOSXGetRootControl(d); + NSWindow *win = [rootview window]; + inPostMenu = 1; int oldMode = Tcl_SetServiceMode(TCL_SERVICE_NONE); |