; InstallTCP
; ©1995 Magne & Kjell
; ALL(!) Rights Reserved.

set TP `getenv THOR/THORPATH`
set CD `cd`
cd "$TP"
echo "Installing new files"
Copy >NIL: "$CD/bin/#?tcp#?" bin/
Copy >NIL: "$CD/s/cfgtcp" s/
Copy >NIL: "$CD/bin/ConnectThor(%|.info)" ""
Protect s/cfgtcp +s
Execute s/cfgtcp
cd "$CD"
echo Done
quit