aboutsummaryrefslogtreecommitdiff
path: root/add_item_to_popup_menu-plugin.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'add_item_to_popup_menu-plugin.tcl')
-rw-r--r--add_item_to_popup_menu-plugin.tcl6
1 files changed, 6 insertions, 0 deletions
diff --git a/add_item_to_popup_menu-plugin.tcl b/add_item_to_popup_menu-plugin.tcl
new file mode 100644
index 0000000..04ebd55
--- /dev/null
+++ b/add_item_to_popup_menu-plugin.tcl
@@ -0,0 +1,6 @@
+
+
+# for more info: http://tcl.tk/man/tcl8.5/TkCmd/menu.htm
+.popup add separator
+.popup add command -label "My Favorite Object" \
+ -command {pdsend "$::focused_window obj $::popup_xcanvas $::popup_ycanvas osc~"}