Index: generic/predefined.h
===================================================================
diff -u -rc72f9f638677608fab1502cd696c8f2d6b2952f9 -rb872864b1f6375c55cf561c9e25335951f1386cf
--- generic/predefined.h	(.../predefined.h)	(revision c72f9f638677608fab1502cd696c8f2d6b2952f9)
+++ generic/predefined.h	(.../predefined.h)	(revision b872864b1f6375c55cf561c9e25335951f1386cf)
@@ -1,5 +1,5 @@
 static char cmd[] = 
-"# $Id: predefined.h,v 1.17 2007/09/05 19:09:22 neumann Exp $\n"
+"# $Id: predefined.xotcl,v 1.16 2007/09/05 19:09:22 neumann Exp $\n"
 "foreach cmd [info command ::xotcl::Object::instcmd::*] {\n"
 "::xotcl::alias ::xotcl::Object [namespace tail $cmd] $cmd}\n"
 "foreach cmd {array append eval incr lappend trace subst unset} {\n"
@@ -336,7 +336,6 @@
 "if {$cmds ne \"\"} {\n"
 "foreach cmd $cmds {\n"
 "foreach {op def} $cmd break\n"
-"$origin trace remove variable $var $op $def\n"
 "if {[lindex $def 0] eq $origin} {\n"
 "set def [concat $dest [lrange $def 1 end]]}\n"
 "$dest trace add variable $var $op $def}}}}\n"