path: root/clone_put_menu_into_popup_menu-plugin.tcl

# 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