Selon Matteo Sisti Sette <[email protected]>: > >> I tried the attached patch without success. > > > > sorry there was a missing quote in the tcl script :/ > > Oh, I meant _my_ attached patch :)
ah, did you try the last proposition? (attached again)
#N canvas 0 0 450 300 12; #X obj 123 38 inlet; #X obj 121 252 outlet; #X obj 121 223 r \$0-sys_gui-r; #X obj 123 110 list trim; #X obj 123 134 sys_gui; #X obj 123 62 list prepend pdsend "\$0-sys_gui-r [; #X obj 123 86 list append ]"; #X connect 0 0 5 0; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 5 0 6 0; #X connect 6 0 3 0;
#N canvas 0 0 450 300 12; #X obj 191 50 getdir; #X obj 191 10 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 223 134 sys_gui; #X obj 191 74 t a a; #X msg 223 104 file mkdir \$1/test-folder; #X obj 191 286 textfile; #X obj 191 212 sys_gui-r; #X msg 191 175 glob -type d \$1; #X obj 191 236 symbol; #X msg 191 262 write \$1/test-folder/MyFile.txt; #X msg 42 214 add pif paf pouf \;; #X connect 0 0 3 0; #X connect 1 0 0 0; #X connect 3 0 7 0; #X connect 3 1 4 0; #X connect 4 0 2 0; #X connect 6 0 8 0; #X connect 7 0 6 0; #X connect 8 0 9 0; #X connect 9 0 5 0; #X connect 10 0 5 0;
_______________________________________________ [email protected] mailing list UNSUBSCRIBE and account-management -> http://lists.puredata.info/listinfo/pd-list
