#!/bin/sh
# the next line restarts using wish \
exec wish "$0" "$@"

if {[info exists env(FTAPE_TOOLDIR)] == 0} {
    set env(FTAPE_TOOLDIR) /usr/local/share/ftape-tools
}
if {[info exists env(TCL_GETTEXT)] == 0} {
    set env(TCL_GETTEXT) /usr/local/share/ftape-tools/tcl_gettext.so
}
global PACKAGE
global LOCALEDIR
set PACKAGE ftape-tools
set LOCALEDIR /usr/local/share/locale
source $env(FTAPE_TOOLDIR)/ftape-tool.tcl

