Index: generic/predefined.xotcl =================================================================== diff -u -rc72f9f638677608fab1502cd696c8f2d6b2952f9 -rb872864b1f6375c55cf561c9e25335951f1386cf --- generic/predefined.xotcl (.../predefined.xotcl) (revision c72f9f638677608fab1502cd696c8f2d6b2952f9) +++ generic/predefined.xotcl (.../predefined.xotcl) (revision b872864b1f6375c55cf561c9e25335951f1386cf) @@ -564,7 +564,7 @@ if {$cmds ne ""} { foreach cmd $cmds { foreach {op def} $cmd break - $origin trace remove variable $var $op $def + #$origin trace remove variable $var $op $def if {[lindex $def 0] eq $origin} { set def [concat $dest [lrange $def 1 end]] }