Evaluated proc dprocbin2 args {set procs ""; set all $args; foreach item $args { foreach name [depends $item] {lappend all $name} }; set all [lsort -unique [flatten $all]]; set out ""; foreach name $all {append out [inspect $name]\n\n}; set ah [textbin $out]; . [^B]the following dependencies were uploaded:[^B] [flatten $all]\n$ah }