diff options
author | dgp <dgp@noemail.net> | 2001-08-27 02:14:08 (GMT) |
---|---|---|
committer | dgp <dgp@noemail.net> | 2001-08-27 02:14:08 (GMT) |
commit | c54a19f19d7882eb59b22b5b1f5ad4d555e6a7d7 (patch) | |
tree | f31e368814b12a6533c90e289fe7be521f22108f /win/tclWinInit.c | |
parent | a7c7189dfbb5c68d39afb72edc63eeac795c5ad4 (diff) | |
download | tcl-c54a19f19d7882eb59b22b5b1f5ad4d555e6a7d7.zip tcl-c54a19f19d7882eb59b22b5b1f5ad4d555e6a7d7.tar.gz tcl-c54a19f19d7882eb59b22b5b1f5ad4d555e6a7d7.tar.bz2 |
* Corrected
inconsistency between the search path for script libraries and
the directory name $DISTNAME into which distributions built
by 'make test' unpack. [Bug 455642]
FossilOrigin-Name: 787474d7135d9d497ad0b1009d2bdedb4dcff987
Diffstat (limited to 'win/tclWinInit.c')
-rw-r--r-- | win/tclWinInit.c | 19 |
1 files changed, 9 insertions, 10 deletions
diff --git a/win/tclWinInit.c b/win/tclWinInit.c index a1eb02a..f90738c 100644 --- a/win/tclWinInit.c +++ b/win/tclWinInit.c @@ -7,7 +7,7 @@ * Copyright (c) 1998-1999 by Scriptics Corporation. * All rights reserved. * - * RCS: @(#) $Id: tclWinInit.c,v 1.27 2001/07/31 19:12:08 vincentdarley Exp $ + * RCS: @(#) $Id: tclWinInit.c,v 1.28 2001/08/27 02:14:08 dgp Exp $ */ #include "tclWinInt.h" @@ -184,8 +184,7 @@ TclpInitLibraryPath(path) */ sprintf(installLib, "lib/tcl%s", TCL_VERSION); - sprintf(developLib, "../tcl%s/library", - ((TCL_RELEASE_LEVEL < 2) ? TCL_PATCH_LEVEL : TCL_VERSION)); + sprintf(developLib, "../tcl%s/library", TCL_PATCH_LEVEL); /* * Look for the library relative to default encoding dir. @@ -221,17 +220,17 @@ TclpInitLibraryPath(path) * This code looks in the following directories: * * <bindir>/../<installLib> - * (e.g. /usr/local/bin/../lib/tcl8.2) + * (e.g. /usr/local/bin/../lib/tcl8.4) * <bindir>/../../<installLib> - * (e.g. /usr/local/TclPro/solaris-sparc/bin/../../lib/tcl8.2) + * (e.g. /usr/local/TclPro/solaris-sparc/bin/../../lib/tcl8.4) * <bindir>/../library - * (e.g. /usr/src/tcl8.2/unix/../library) + * (e.g. /usr/src/tcl8.4.0/unix/../library) * <bindir>/../../library - * (e.g. /usr/src/tcl8.2/unix/solaris-sparc/../../library) + * (e.g. /usr/src/tcl8.4.0/unix/solaris-sparc/../../library) * <bindir>/../../<developLib> - * (e.g. /usr/src/tcl8.2/unix/../../tcl8.2/library) - * <bindir>/../../../<devlopLib> - * (e.g. /usr/src/tcl8.2/unix/solaris-sparc/../../../tcl8.2/library) + * (e.g. /usr/src/tcl8.4.0/unix/../../tcl8.4.0/library) + * <bindir>/../../../<developLib> + * (e.g. /usr/src/tcl8.4.0/unix/solaris-sparc/../../../tcl8.4.0/library) */ /* |