Hi!

I've started playing with 8.5 on Mac (Intel) and it seems to work fine
except for this:
Cascade menus don't seem to work at all.
Does anyone know if this is supposed to work?
Here is a sample snippet that works fine on Windows (after changing to
ButtonPress-3):

################
set ::tk::mac::useCustomMDEF 1
catch {console show}

proc showmenu {} {
	set x [winfo pointerx .]
	set y [winfo pointery .]

	menu .submenu -type tearoff
	.submenu add command -label "Cascaded item" -command "puts {Cascaded
item}"
	
	menu .m -tearoff 0
	.m add command -label "Test" -command "puts Test"
	.m add cascade -label "And a cascade" -menu .submenu
	update
	.m post $x $y
	update
	destroy .submenu
	destroy .m
}

bind . <ButtonPress-2>  "showmenu"
################

Doesn't matter if I set useCustomMDEF to 0 either.

I'm using HEAD (from 29/5 at 14:44).

Cheers,

Linus



-------------------------------------------------------------------------
This SF.net email is sponsored by DB2 Express
Download DB2 Express C - the FREE version of DB2 express and take
control of your XML. No limits. Just data. Click to get it now.
http://sourceforge.net/powerbar/db2/
_______________________________________________
Tcl-mac mailing list
tcl-mac@[...].net
https://lists.sourceforge.net/lists/listinfo/tcl-mac