Index: generic/tclNamesp.c
===================================================================
RCS file: /cvsroot/tcl/tcl/generic/tclNamesp.c,v
retrieving revision 1.149
diff -u -r1.149 tclNamesp.c
--- generic/tclNamesp.c	9 Sep 2007 19:28:31 -0000	1.149
+++ generic/tclNamesp.c	9 Sep 2007 20:52:35 -0000
@@ -2693,7 +2693,7 @@
 	/* Check that the ResolvedNsName is still valid. */
 	resNamePtr = (ResolvedNsName *) objPtr->internalRep.twoPtrValue.ptr1;
 	nsPtr = resNamePtr->nsPtr;
-	if (!(nsPtr->flags & NS_DYING)
+	if (!(nsPtr->flags & NS_DEAD)
 		&& ((resNamePtr->refNsPtr == NULL) || (resNamePtr->refNsPtr
 		== (Namespace *) Tcl_GetCurrentNamespace(interp)))) {
 	    *nsPtrPtr = (Tcl_Namespace *) nsPtr;
@@ -4668,7 +4668,7 @@
      * that holds a reference to it.
      */
 
-    if ((nsPtr != NULL) && !(nsPtr->flags & NS_DYING)) {
+    if ((nsPtr != NULL) && !(nsPtr->flags & NS_DEAD)) {
 	nsPtr->refCount++;
 	resNamePtr = (ResolvedNsName *) ckalloc(sizeof(ResolvedNsName));
 	resNamePtr->nsPtr = nsPtr;
