From f7a64b3a111891d5f7f79ce94bbb37abedd30176 Mon Sep 17 00:00:00 2001
From: dkf <donal.k.fellows@manchester.ac.uk>
Date: Fri, 5 Mar 2010 11:36:19 +0000
Subject: Remove unused variable

---
 generic/tclOODefineCmds.c | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/generic/tclOODefineCmds.c b/generic/tclOODefineCmds.c
index ad088af..1cf0786 100644
--- a/generic/tclOODefineCmds.c
+++ b/generic/tclOODefineCmds.c
@@ -9,7 +9,7 @@
  * See the file "license.terms" for information on usage and redistribution of
  * this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclOODefineCmds.c,v 1.12 2010/03/04 23:42:54 dkf Exp $
+ * RCS: @(#) $Id: tclOODefineCmds.c,v 1.13 2010/03/05 11:36:19 dkf Exp $
  */
 
 #ifdef HAVE_CONFIG_H
@@ -1657,7 +1657,6 @@ TclOODefineSuperclassObjCmd(
     Tcl_Obj *const *objv)
 {
     Object *oPtr;
-    Foundation *fPtr = TclOOGetFoundation(interp);
     Class **superclasses, *superPtr;
     int i, j;
 
-- 
cgit v0.12