From c5e8b71d6e3be0bf8385db975f0f91a717cbd7e8 Mon Sep 17 00:00:00 2001
From: Miguel Sofer <miguel.sofer@gmail.com>
Date: Sun, 17 Oct 2004 14:22:07 +0000
Subject: generic/tclResult.c: removed unused variable [Bug 1048588].

---
 ChangeLog           | 5 +++++
 generic/tclResult.c | 3 +--
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index acbfabe..3546ec3 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2004-10-17  Miguel Sofer <msofer@users.sf.net>
+
+	* generic/tclResult.c: removed unused variable [Bug 1048588]. 
+	Thanks to Daniel South.
+
 2004-10-15  Don Porter  <dgp@users.sourceforge.net>
 
 	* generic/tclCmdMZ.c (TclProcessReturn):	Now that primary
diff --git a/generic/tclResult.c b/generic/tclResult.c
index 9fd0bfc..2545d1f 100644
--- a/generic/tclResult.c
+++ b/generic/tclResult.c
@@ -8,7 +8,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclResult.c,v 1.15 2004/10/15 04:01:33 dgp Exp $
+ * RCS: @(#) $Id: tclResult.c,v 1.16 2004/10/17 14:22:08 msofer Exp $
  */
 
 #include "tclInt.h"
@@ -941,7 +941,6 @@ TclTransferResult(sourceInterp, result, targetInterp)
 				 * are the same, nothing is done. */
 {
     Interp *iPtr;
-    Tcl_Obj *objPtr;
 
     if (sourceInterp == targetInterp) {
 	return;
-- 
cgit v0.12