From e58f6b3236f51c06e53c407a46d41f5e898c3b3c Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Tue, 30 Nov 2010 21:18:47 +0000 Subject: added the simple plugins from the pd-gui-rewrite/0.43/startup branch svn path=/trunk/scripts/guiplugins/simple_examples/; revision=14540 --- clone_put_menu_into_popup_menu-plugin.tcl | 6 ++++++ 1 file changed, 6 insertions(+) create mode 100644 clone_put_menu_into_popup_menu-plugin.tcl (limited to 'clone_put_menu_into_popup_menu-plugin.tcl') diff --git a/clone_put_menu_into_popup_menu-plugin.tcl b/clone_put_menu_into_popup_menu-plugin.tcl new file mode 100644 index 0000000..0a1de7a --- /dev/null +++ b/clone_put_menu_into_popup_menu-plugin.tcl @@ -0,0 +1,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 -- cgit v1.2.1