Posted to tcl by stevel at Mon Jan 21 10:43:13 GMT 2008view pretty

tclsh  Site.tcl
RC: -port 8080
RC: -port 8088 -scgi_send {::scgi Send}
RC: scriptname Worker.tcl dispatch Backend
RC: 
RC: maxsize 204800
RC: max 1 incr 1 over 40 dispatch ""
RC: host Macintosh.local multi 0 globaldocroot 1 backends 5 cmdport 8082 application "" wubdir ../../Wub/Wub/.. scriptdir /Volumes/Data_HD/steve/Desktop/Wub/Wub local /Volumes/Data_HD/steve/Desktop/wikitcl/wubwikit/local.tcl vars /Volumes/Data_HD/steve/Desktop/wikitcl/wubwikit/vars.tcl listener {-port 8080} scgi {-port 8088 -scgi_send {::scgi Send}} backend {scriptname Worker.tcl dispatch Backend} varnish {} cache {maxsize 204800} httpd {max 1 incr 1 over 40 dispatch ""}
Default: host 'Macintosh.local'
Default: multi '0'
Default: globaldocroot '1'
Default: backends '5'
Default: cmdport '8082'
Default: application ''
Default: wubdir '../../Wub/Wub/..'
Default: scriptdir '/Volumes/Data_HD/steve/Desktop/Wub/Wub'
Default: local '/Volumes/Data_HD/steve/Desktop/wikitcl/wubwikit/local.tcl'
Default: vars '/Volumes/Data_HD/steve/Desktop/wikitcl/wubwikit/vars.tcl'
Default: listener '-port 8080'
Default: scgi '-port 8088 -scgi_send {::scgi Send}'
Default: backend 'scriptname Worker.tcl dispatch Backend'
Default: varnish ''
Default: cache 'maxsize 204800'
Default: httpd 'max 1 incr 1 over 40 dispatch ""'
error copying "/Volumes/Data_HD/steve/Desktop/Wub/docroot": no such file or directory
    while executing
"file copy $origin [file dirname $docroot]"
    (in namespace eval "::Site" script line 10)
    invoked from within
"namespace eval Site {
    variable origin $docroot    ;# the original copies for priming
    variable wikitroot [file join $base data]   ;# where the wikit..."
    (file "Site.tcl" line 34)