# book - 
# startup file for tcl/tk books
# sources the files necessary for startup

set tclbook_directory "c:\\tclold\\tcl\\"
source [file join $tclbook_directory mkbook5.txt]
source [file join $tclbook_directory book5.txt]

    Source: geocities.com/soho/square/3472

               ( geocities.com/soho/square)                   ( geocities.com/soho)