diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-09-08 11:26:50 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-09-08 11:26:50 (GMT) |
| commit | 67943d16d92273e936a78a501c5c8bd39214dca7 (patch) | |
| tree | cfb6d35388ee1881d88b6759d075afb13541e4d7 /library | |
| parent | c43384122e59830ac073778ad00ec4ee8c88766f (diff) | |
| download | tcl-67943d16d92273e936a78a501c5c8bd39214dca7.zip tcl-67943d16d92273e936a78a501c5c8bd39214dca7.tar.gz tcl-67943d16d92273e936a78a501c5c8bd39214dca7.tar.bz2 | |
Incorrect use of $mountpoint variable
Diffstat (limited to 'library')
| -rw-r--r-- | library/auto.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/library/auto.tcl b/library/auto.tcl index 2e70873..9aa4da3 100644 --- a/library/auto.tcl +++ b/library/auto.tcl @@ -79,8 +79,8 @@ proc tcl_findLibrary {basename version patch initScript enVarName varName} { set root [zipfs root] set mountpoint [file join $root lib $basename] lappend dirs [file join $root app ${basename}_library] - lappend dirs [file join $root lib $mountpoint ${basename}_library] - lappend dirs [file join $root lib $mountpoint] + lappend dirs [file join $root lib ${basename} ${basename}_library] + lappend dirs [file join $root lib ${basename}] if {![zipfs exists [file join $root app ${basename}_library]] \ && ![zipfs exists $mountpoint]} { set found 0 |