diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-12-15 15:07:56 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-12-15 15:07:56 (GMT) |
commit | 05a9b0d75c5f3d0fc45c4758059e7fb26602e762 (patch) | |
tree | 29861e2c7a3ee74bc83a6fe539bd6713afa15bb3 /generic/tclInterp.c | |
parent | 6edec95607f4e4fc878a411ef6d1d4653d55391f (diff) | |
download | tcl-05a9b0d75c5f3d0fc45c4758059e7fb26602e762.zip tcl-05a9b0d75c5f3d0fc45c4758059e7fb26602e762.tar.gz tcl-05a9b0d75c5f3d0fc45c4758059e7fb26602e762.tar.bz2 |
Add "file join $grandParentDir tcl8.? library" as possible path for a valid init.tcl.
Some simplifications in use of test restrictions.
Diffstat (limited to 'generic/tclInterp.c')
-rw-r--r-- | generic/tclInterp.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclInterp.c b/generic/tclInterp.c index 1bfe76a..6983cc6 100644 --- a/generic/tclInterp.c +++ b/generic/tclInterp.c @@ -410,6 +410,7 @@ Tcl_Init( " {file join $grandParentDir lib tcl[info tclversion]} \\\n" " {file join $parentDir library} \\\n" " {file join $grandParentDir library} \\\n" +" {file join $grandParentDir tcl[info tclversion] library} \\\n" " {file join $grandParentDir tcl[info patchlevel] library} \\\n" " {\n" "file join [file dirname $grandParentDir] tcl[info patchlevel] library}\n" |