From f27595166b79ca080f874d01242aeed2e8459d0f Mon Sep 17 00:00:00 2001
From: ericm <ericm>
Date: Fri, 11 Aug 2000 17:42:40 +0000
Subject: * generic/tclEnv.c (TclUnsetEnv): Changed declaration of length
 variable from "unsigned int" to "int", to match usage when passed to
 TclpFindVariable [Bug: 6126].

---
 ChangeLog        | 6 ++++++
 generic/tclEnv.c | 4 ++--
 2 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 14a4d1d..8553d65 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2000-08-11  Eric Melski  <ericm@ajubasolutions.com>
+
+	* generic/tclEnv.c (TclUnsetEnv): Changed declaration of length
+	variable from "unsigned int" to "int", to match usage when passed
+	to TclpFindVariable [Bug: 6126].
+
 2000-08-10  Eric Melski  <ericm@ajubasolutions.com>
 
 	* library/msgcat1.0/pkgIndex.tcl: Bumped version number to 1.2
diff --git a/generic/tclEnv.c b/generic/tclEnv.c
index 0eda081..1650ed2 100644
--- a/generic/tclEnv.c
+++ b/generic/tclEnv.c
@@ -12,7 +12,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclEnv.c,v 1.8 2000/05/22 23:54:31 hobbs Exp $
+ * RCS: @(#) $Id: tclEnv.c,v 1.9 2000/08/11 17:42:41 ericm Exp $
  */
 
 #include "tclInt.h"
@@ -356,7 +356,7 @@ TclUnsetEnv(name)
     CONST char *name;		/* Name of variable to remove (UTF-8). */
 {
     char *oldValue;
-    unsigned int length;
+    int length;
     int index;
 #ifdef USE_PUTENV
     Tcl_DString envString;
-- 
cgit v0.12