Index: tests/testx.xotcl
===================================================================
diff -u -re2bce71b86e234dd095039949f8e7dbbb4a4620e -rf9807b1cea03590c9573b5a521760538d53ee90f
--- tests/testx.xotcl	(.../testx.xotcl)	(revision e2bce71b86e234dd095039949f8e7dbbb4a4620e)
+++ tests/testx.xotcl	(.../testx.xotcl)	(revision f9807b1cea03590c9573b5a521760538d53ee90f)
@@ -1742,7 +1742,6 @@
     puts stderr "### heritage: [a0 info precedence]"
 
     a0 parametercmd f6
-    puts stderr OK
 
     ::errorCheck [a0 procsearch f1] "::A instproc f1" procsearch-1
     ::errorCheck [a0 procsearch f2] "::A instforward f2" procsearch-2
@@ -2623,15 +2622,6 @@
       "tclProc--tclProc"\
       "object hierarchy copy"
 
-#todo REMOVE ME
-    Class DestroyWatch
-    DestroyWatch instproc destroy args {
-      puts stderr "[self] destroy"
-      next
-    }
-    ::xotcl::Class instmixin DestroyWatch
-### until here
-
     Class O
     O x