diff options
| author | surles <surles@noemail.net> | 1998-07-24 13:49:12 (GMT) |
|---|---|---|
| committer | surles <surles@noemail.net> | 1998-07-24 13:49:12 (GMT) |
| commit | 5f27de81c518d15e7adff0129c35541ed51c0843 (patch) | |
| tree | adfbcc6f4259a132707c66b34c76a64cab2654f4 /generic/tclInitScript.h | |
| parent | 6be90e7eeadbcb23da0f82d3d58f4c3eceb7006a (diff) | |
| download | tcl-5f27de81c518d15e7adff0129c35541ed51c0843.zip tcl-5f27de81c518d15e7adff0129c35541ed51c0843.tar.gz tcl-5f27de81c518d15e7adff0129c35541ed51c0843.tar.bz2 | |
Updated core w/ Micheals latest changes.
FossilOrigin-Name: dff1740f40847976ed07a0cbbd12c28f87857e22
Diffstat (limited to 'generic/tclInitScript.h')
| -rw-r--r-- | generic/tclInitScript.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclInitScript.h b/generic/tclInitScript.h index 3c0e1e3..b8900cf 100644 --- a/generic/tclInitScript.h +++ b/generic/tclInitScript.h @@ -14,7 +14,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * SCCS: %Z% $Id: tclInitScript.h,v 1.2 1998/07/09 13:46:23 suresh Exp $ + * SCCS: %Z% $Id: tclInitScript.h,v 1.3 1998/07/24 13:49:59 surles Exp $ */ /* @@ -27,7 +27,7 @@ static char initScript[] = "if {[info proc tclInit]==\"\"} {\n\ proc tclInit {} {\n\ global tcl_library tcl_version tcl_patchLevel errorInfo\n\ - global tcl_pkgPath env\n\ + global env tcl_pkgPath\n\ rename tclInit {}\n\ set errors {}\n\ set dirs {}\n\ |