#!/bin/sh
# Start MapSlicer
#
# \
versions="wish wish8.4 wish8.3 wish8.5" ; \
got_wish=no ; \
if [ ! -z "$CCP4I_TCLTK" ] ; then \
    for v in $versions ; do \
      trywish="${CCP4I_TCLTK}/$v" ; \
      if [ -x $trywish ] ; then \
        got_wish=yes ; \
        wish=$trywish ; \
        break ; \
      fi ; \
    done ; \
fi ; \
if [ "$got_wish" != "yes" ] ; then \
  echo "Mapslicer: no version of wish found" ; \
  echo "Stopping" ; \
  exit 1 ; \
fi ; \
# \
exec $wish "$0" -- ${1+"$@"}
source [file join $env(CCP4I_TOP) bin mapslicer.tcl]