#!/usr/local/bin/tkgwish4.1
# \
exec tkgwish4.1 "$0" ${1+"$@"}

# tkgoodstuff version 4.1, 30 Sep, 1996
# See the file "COPYRIGHT" in the doc directory for more info

set TKG(version) "4.1"
set TKG(releasedate) "30 Sep, 1996"
set TKG(libdir) /usr/local/lib/tkgoodstuff
set TKG(language) english

set TKG(configfileformatversion) 1

if [catch {package require Tk 4.1}] {
  error "tkgoodstuff requires at least (non-beta) tcl7.5/tk4.1"
}

foreach f {
    startup.tcl defaults.tcl configcommands.tcl panelgeo.tcl
    elements.tcl dialogs.tcl international.tcl async.tcl mainwin.tcl
    popup.tcl inits.tcl misc.tcl tkgbutton.tcl swallow.tcl
} { source $TKG(libdir)/tcl/$f }
unset f

##############################################################
# Main Program:
##############################################################

TKGInitialize
TKGRCInit
TKGGetPreferences
TKGLibInit
TKGBLTInit
TKGFvwmInit
TKGLangInit
TKGDefaults
TKGEvalConfig
TKGResolvePreferences
TKGSetResources
TKGDoHook TKG_clientsloaded_hook
TKGPopupInit
TKGScreenEdgeInit
TKGInitClients
TKGDraw
TKGDoHook TKG_alldone_hook
