summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2004-06-17 20:18:25 (GMT)
committerdgp <dgp@users.sourceforge.net>2004-06-17 20:18:25 (GMT)
commit1166cd31795ae95c0ee8ed21c248a6ba1c78212d (patch)
tree8a7693db4bfa982aa36ef3806c7c91e3ef42e169
parent257f4ada5c10c8baf4c123f22daba65b64dd0db1 (diff)
downloadtcl-1166cd31795ae95c0ee8ed21c248a6ba1c78212d.zip
tcl-1166cd31795ae95c0ee8ed21c248a6ba1c78212d.tar.gz
tcl-1166cd31795ae95c0ee8ed21c248a6ba1c78212d.tar.bz2
temporarily removed unset of ::tclDefaultLibrary for sake of testing.
-rw-r--r--generic/tclInterp.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclInterp.c b/generic/tclInterp.c
index b5ef40f..5226c05 100644
--- a/generic/tclInterp.c
+++ b/generic/tclInterp.c
@@ -10,7 +10,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclInterp.c,v 1.39 2004/06/11 22:39:29 dgp Exp $
+ * RCS: @(#) $Id: tclInterp.c,v 1.40 2004/06/17 20:18:25 dgp Exp $
*/
#include "tclInt.h"
@@ -72,7 +72,7 @@ static char initScript[] = "if {[info proc tclInit]==\"\"} {\n\
}\n\
catch {\n\
lappend dirs $tclDefaultLibrary\n\
- unset tclDefaultLibrary\n\
+#unset tclDefaultLibrary\n\
}\n\
catch {\n\
set dirs [concat $dirs $tcl_libPath]\n\