|
|
|
@ -34,7 +34,13 @@ if {[file exists $modulefolder]} {
|
|
|
|
|
if {[file exists [pwd]/modules]} { |
|
|
|
|
catch {tcl::tm::add [pwd]/modules} |
|
|
|
|
} |
|
|
|
|
|
|
|
|
|
if {[file exists [pwd]/lib]} { |
|
|
|
|
lappend ::auto_path [pwd]/lib |
|
|
|
|
} |
|
|
|
|
set libfolder [file dirname [file dirname [info nameofexecutable]]]/lib |
|
|
|
|
if {[file exists $libfolder]} { |
|
|
|
|
lappend ::auto_path $libfolder |
|
|
|
|
} |
|
|
|
|
|
|
|
|
|
#2) |
|
|
|
|
#now add current dir (if no conflict with above) |
|
|
|
@ -58,7 +64,7 @@ if {[llength $currentdir_modules]} {
|
|
|
|
|
} |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#puts stdout "$::auto_path" |
|
|
|
|
package require Thread |
|
|
|
|
#These are strong dependencies |
|
|
|
|
# - the repl requires Threading and punk,shellfilter,shellrun to call and display properly. |
|
|
|
|