From 4aa88d59d473ee543215444203e8d03a2b7cc6da Mon Sep 17 00:00:00 2001
From: Miguel Sofer <miguel.sofer@gmail.com>
Date: Thu, 5 Jul 2007 12:03:27 +0000
Subject: clarify comments for last commit

---
 generic/tclNamesp.c | 4 ++--
 generic/tclObj.c    | 4 ++--
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/generic/tclNamesp.c b/generic/tclNamesp.c
index 564be56..b8ec6e8 100644
--- a/generic/tclNamesp.c
+++ b/generic/tclNamesp.c
@@ -22,7 +22,7 @@
  * See the file "license.terms" for information on usage and redistribution of
  * this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclNamesp.c,v 1.145 2007/07/05 11:49:16 msofer Exp $
+ * RCS: @(#) $Id: tclNamesp.c,v 1.146 2007/07/05 12:03:27 msofer Exp $
  */
 
 #include "tclInt.h"
@@ -4844,7 +4844,7 @@ SetNsNameFromAny(
 	if ((objPtr->typePtr == &tclNsNameType)
 		&& resNamePtr && (resNamePtr->refCount == 1)) {
 	    /*
-	     * Reuse the old ResolvedNsName struct after freeing it
+	     * Reuse the old ResolvedNsName struct instead of freeing it
 	     */
 	    
 	    Namespace *oldNsPtr = resNamePtr->nsPtr;
diff --git a/generic/tclObj.c b/generic/tclObj.c
index c0f4395..8188d7e 100644
--- a/generic/tclObj.c
+++ b/generic/tclObj.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: tclObj.c,v 1.129 2007/07/05 11:49:16 msofer Exp $
+ * RCS: @(#) $Id: tclObj.c,v 1.130 2007/07/05 12:03:27 msofer Exp $
  */
 
 #include "tclInt.h"
@@ -3722,7 +3722,7 @@ SetCmdNameFromAny(
 	if ((objPtr->typePtr == &tclCmdNameType)
 		&& resPtr && (resPtr->refCount == 1)) {
 	    /*
-	     * Reuse the old ResolvedCmdName struct after freeing it
+	     * Reuse the old ResolvedCmdName struct instead of freeing it
 	     */
 	    
 	    Command *oldCmdPtr = resPtr->cmdPtr;
-- 
cgit v0.12