ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/util/tradinstall.csh
Revision: 2.4
Committed: Sun Sep 29 12:24:33 1996 UTC (27 years, 6 months ago) by greg
Content type: application/x-csh
Branch: MAIN
Changes since 2.3: +11 -14 lines
Log Message:
made changes to support wish4.x

File Contents

# Content
1 #!/bin/csh -fe
2 # SCCSid "$SunId$ LBL"
3 # Install correct version of trad for wish or wish4.0
4 #
5 set instdir = $1
6 set libdir = $2
7
8 set TLIBFILES = ( *[a-z].tcl *.hlp trad.icon tclIndex )
9
10 set TDIFFS = (`ls | sed -n 's/3\.6\.tcl$//p'`)
11
12 set WISHCOMS = ( wish4.{3,2,1,0} wish )
13
14 foreach w ( $WISHCOMS )
15 foreach d ($path)
16 if (-x $d/$w) then
17 set wishcom = $d/$w
18 break
19 endif
20 end
21 if ( $?wishcom ) break
22 end
23 if (! $?wishcom) then
24 echo "Cannot find wish executable in current path -- trad not installed."
25 exit 1
26 endif
27 if ( $wishcom:t == wish ) set oldwish
28
29 echo "Installing trad using $wishcom"
30
31 sed -e "1s|/usr/local/bin/wish4\.0|$wishcom|" \
32 -e "s|^set radlib .*|set radlib $libdir|" trad.wsh > $instdir/trad
33 chmod 755 $instdir/trad
34 if (! -d $libdir) then
35 mkdir $libdir
36 endif
37 (cd $libdir ; rm -f $TLIBFILES)
38 cp $TLIBFILES $libdir
39 if ($?oldwish) then
40 foreach i ($TDIFFS)
41 rm -f $libdir/$i.tcl
42 cp ${i}3.6.tcl $libdir/$i.tcl
43 end
44 endif