Changes to make pT work in pd-extended.

svn path=/trunk/abstractions/pixelTANGO/; revision=4820

1 files changed, 54 insertions, 39 deletions

diff --git a/abstractions/pt.filelist.pd b/abstractions/pt.filelist.pd
index 1b7bb71..7aa5cef 100644
--- a/abstractions/pt.filelist.pd
+++ b/abstractions/pt.filelist.pd
@@ -1,7 +1,7 @@
-#N canvas 394 251 130 112 10;
+#N canvas 19 424 609 373 10;
 #X obj 1 1 cnv 5 128 110 empty empty List_Files 5 6 1 9 -249661 -66577
 0;
-#N canvas 544 188 599 585 interna 0;
+#N canvas 544 188 619 605 interna 0;
 #X obj 115 20 cnv 15 350 500 empty empty empty 5 8 1 10 -260390 -1
 0;
 #X obj 326 474 prepend file;
@@ -12,44 +12,61 @@
 #X obj 21 334 outlet;
 #X obj 326 454 prepend open;
 #X text 9 4 Facility to glob directories of files;
-#X obj 164 218 dirlist;
-#X obj 235 145 r \$0-dir;
-#X obj 123 145 r \$0-pattern;
-#X obj 123 165 prepend pattern;
+#X obj 304 202 r \$0-dir;
+#X obj 133 211 r \$0-pattern;
 #X obj 236 50 mementoSetup pt.filelist \$0;
-#X obj 236 90 f \$0;
-#X obj 164 266 s \$0-files;
+#X obj 132 481 s \$0-files;
 #X obj 326 434 r \$0-file;
-#X obj 164 242 prepend options;
-#X msg 253 191 set-dir \$1;
-#X msg 236 110 \; \$1-set-pattern symbol *;
-#X obj 235 219 s \$0-dir-in;
-#X obj 124 475 r \$0-reload;
-#X obj 124 497 s \$0-set-pattern;
-#X obj 304 145 r \$0-dir-out;
-#X obj 236 70 delay 65;
+#X obj 304 243 s \$0-dir-in;
+#X obj 177 240 r \$0-reload;
+#X obj 303 265 r \$0-dir-out;
 #X text 21 533 if the directory is the same then don't send back to
 symbol;
-#X obj 235 165 dirpanel;
+#X obj 304 222 dirpanel;
+#X obj 132 440 folder_list;
+#X msg 132 460 append \$1;
+#X text 210 482 2popup;
+#X obj 134 310 symbol;
+#X obj 185 334 symbol;
+#X text 187 312 pattern;
+#X text 234 335 directory;
+#X obj 133 397 makesymbol %s/%s;
+#X obj 133 355 pack s s;
+#X obj 266 123 getdir;
+#X msg 134 376 list \$2 \$1;
+#X obj 133 417 t s b;
+#X msg 225 440 options;
+#X obj 236 71 delay 250;
+#X obj 133 189 s \$0-set-pattern;
+#X obj 236 94 t b b;
+#X msg 133 169 symbol *;
 #X connect 1 0 3 0;
-#X connect 2 0 13 0;
+#X connect 2 0 11 0;
 #X connect 5 0 6 0;
 #X connect 7 0 1 0;
-#X connect 9 0 17 0;
-#X connect 10 0 26 0;
-#X connect 11 0 12 0;
-#X connect 12 0 9 0;
-#X connect 13 0 24 0;
-#X connect 13 1 3 0;
-#X connect 14 0 19 0;
-#X connect 16 0 7 0;
-#X connect 17 0 15 0;
-#X connect 18 0 9 0;
-#X connect 21 0 22 0;
-#X connect 23 0 18 0;
-#X connect 24 0 14 0;
-#X connect 26 0 18 0;
-#X connect 26 0 20 0;
+#X connect 9 0 18 0;
+#X connect 10 0 22 0;
+#X connect 11 0 32 0;
+#X connect 11 1 3 0;
+#X connect 13 0 7 0;
+#X connect 15 0 22 0;
+#X connect 16 0 23 0;
+#X connect 18 0 14 0;
+#X connect 19 0 20 0;
+#X connect 20 0 12 0;
+#X connect 22 0 27 0;
+#X connect 23 0 27 1;
+#X connect 26 0 30 0;
+#X connect 27 0 29 0;
+#X connect 28 0 14 0;
+#X connect 29 0 26 0;
+#X connect 30 0 19 0;
+#X connect 30 1 31 0;
+#X connect 31 0 12 0;
+#X connect 32 0 34 0;
+#X connect 34 0 35 0;
+#X connect 34 1 28 0;
+#X connect 35 0 33 0;
 #X restore 10 295 pd interna;
 #X obj 10 273 inlet;
 #X obj 75 274 inlet;
@@ -75,8 +92,7 @@ symbol;
 #X obj 386 9 r \$0-dir-out;
 #X obj 386 122 s \$0-dir-in;
 #X obj 301 97 t b b;
-#X msg 17 215 options empty \, name files;
-#X obj 3 81 popup 124 25 grey95 files empty;
+#X obj 3 81 popup 124 25 grey95 files;
 #X obj 147 22 r \$0-files;
 #X connect 1 0 4 0;
 #X connect 1 1 5 0;
@@ -91,7 +107,6 @@ symbol;
 #X connect 21 0 11 0;
 #X connect 23 0 12 0;
 #X connect 23 1 22 0;
-#X connect 24 0 25 0;
-#X connect 25 1 9 0;
-#X connect 26 0 25 0;
-#X coords 0 0 1 1 130 112 1;
+#X connect 24 1 9 0;
+#X connect 25 0 24 0;
+#X coords 0 0 1 1 130 112 1 0 0;