aboutsummaryrefslogtreecommitdiff
path: root/clone_put_menu_into_popup_menu-plugin.tcl
blob: 0a1de7a34d7546b70e07df1953155f1d0750b0b0 (plain)
1
2
3
4
5
6


# for more info: http://tcl.tk/man/tcl8.5/TkCmd/menu.htm
.menubar.put clone .popup.create normal
.popup insert 0 cascade -label [_ "Put"] -menu .popup.create
.popup.create configure -tearoff 1