#!/bin/sh
# -*-tcl -*-
# hide next line from tcl \
exec "/usr/bin/tclsh" "$0" ${1+"$@"}

set libpath [file join [file dirname [file dirname [
		file normalize [file join [info script] ...]]]] .. lib]
set libpath [file join $libpath tcltk]
if {[lsearch -exact $auto_path $libpath] < 0} {
		set auto_path [linsert $auto_path[set auto_path {}] 0 $libpath]
}

package require critcl::app
critcl::app::main $argv
