#!/bin/csh -fe

# RCSid: $Id: tradinstall.csh,v 2.7 2003/02/22 02:07:30 greg Exp $

# Install correct version of trad for wish or wish4.0

#

set instdir = $1

set libdir = $2

set TLIBFILES = ( *[a-z].tcl *.hlp trad.icon tclIndex )

set TDIFFS = (`ls | sed -n 's/3\.6\.tcl$//p'`)

set WISHCOMS = ( wish4.{3,2,1,0} wish8.0 wish )

foreach w ( $WISHCOMS )

	foreach d ($path)

		if (-x $d/$w) then

			set wishcom = $d/$w

			break

		endif

	end

	if ( $?wishcom ) break

end

if (! $?wishcom) then

	echo "Cannot find wish executable in current path -- trad not installed."

	exit 1

endif

# if ( $wishcom:t == wish ) then

#	set wishcom="$wishcom -f"

#	set oldwish

# endif

echo "Installing trad using $wishcom"

sed -e "1s|/usr/local/bin/wish4\.0|$wishcom|" \

	-e "s|^set radlib .*|set radlib $libdir|" trad.wsh > $instdir/trad

chmod 755 $instdir/trad

if (! -d $libdir) then

	mkdir $libdir

endif

(cd $libdir ; rm -f $TLIBFILES)

cp $TLIBFILES $libdir

if ($?oldwish) then

	foreach i ($TDIFFS)

		rm -f $libdir/$i.tcl

		cp ${i}3.6.tcl $libdir/$i.tcl

	end

endif