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