contextual menu helpers

svn path=/trunk/abstractions/senderfruit/; revision=10261

1 files changed, 31 insertions, 0 deletions

diff --git a/core/mate.pd b/core/mate.pd
new file mode 100644
index 0000000..6490d07
--- /dev/null
+++ b/core/mate.pd
@@ -0,0 +1,31 @@
+#N canvas 0 22 450 300 10;
+#X obj 284 110 getdir 1;
+#X obj 284 163 list2symbol /;
+#X obj 284 75 t b b;
+#X obj 347 110 getpatchname 1;
+#X obj 284 133 list append;
+#X obj 284 51 loadbang;
+#X obj 284 195 s \$0fullFile;
+#X obj 364 195 s \$0file;
+#X obj 233 196 s \$0dir;
+#X obj 144 167 popen;
+#X obj 144 110 list;
+#X obj 144 80 r \$0edit;
+#X obj 175 110 r \$0fullFile;
+#X msg 144 137 mate \$1;
+#X obj 101 101 bng 15 250 50 0 \$0edit \$0editR T 4 8 0 12 -139998
+-262144 -262144;
+#X connect 0 0 4 0;
+#X connect 0 0 8 0;
+#X connect 1 0 6 0;
+#X connect 2 0 0 0;
+#X connect 2 1 3 0;
+#X connect 3 0 4 1;
+#X connect 3 0 7 0;
+#X connect 4 0 1 0;
+#X connect 5 0 2 0;
+#X connect 10 0 13 0;
+#X connect 11 0 10 0;
+#X connect 12 0 10 1;
+#X connect 13 0 9 0;
+#X coords 0 -1 1 1 17 17 2 100 100;