1if {![package vsatisfies [package provide Tcl] 8.4]} return 2package ifneeded transfer::copy 0.3 [list source [file join $dir copyops.tcl]] 3package ifneeded transfer::copy::queue 0.1 [list source [file join $dir tqueue.tcl]] 4package ifneeded transfer::data::source 0.2 [list source [file join $dir dsource.tcl]] 5package ifneeded transfer::data::destination 0.2 [list source [file join $dir ddest.tcl]] 6package ifneeded transfer::connect 0.2 [list source [file join $dir connect.tcl]] 7package ifneeded transfer::transmitter 0.2 [list source [file join $dir transmitter.tcl]] 8package ifneeded transfer::receiver 0.2 [list source [file join $dir receiver.tcl]] 9