#!/bin/sh
#
# Thanks to Alain Nissen for this - I couldn't be fashed to do it!!
#
IFS="${IFS=   }"
old_ifs="$IFS"
IFS="${IFS}:"
if test -z "$*"
then
    progs="%%WISH%%"
else 
    progs="%%TCLSH%%"
fi
my_wish=
for wish in $progs
do
  for dir in $PATH
  do
    test -f "$dir/$wish" && my_wish="$dir/$wish"
    test ! -z "$my_wish" && break
  done
  test ! -z "$my_wish" && break
done
IFS=$old_ifs
if test ! -z "$my_wish"
then
  exec $my_wish installer/install.tcl $*
fi
echo Cannot find a tcl/tk interpreter!!
exit 1