TestCase.st
changeset 565 0bcfed632d51
parent 564 532d91f2daf8
child 570 c9c4c97948cc
--- a/TestCase.st	Wed Apr 03 15:56:57 2013 +0200
+++ b/TestCase.st	Wed Apr 03 15:58:07 2013 +0200
@@ -711,22 +711,12 @@
         "/  self copy perform:aSymbol
         "/ or even
         "/  self perform:aSymbol
-        "/ (self class selector:testSelector) perform:aSymbol
         self perform:aSymbol
     ] ensure:[
         self resources do:[:each |
             each reset
         ]
     ]
-
-
-
-
-
-
-
-
-
 !
 
 failureLog
@@ -904,11 +894,11 @@
 !TestCase class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestCase.st,v 1.96 2013-04-03 13:56:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestCase.st,v 1.97 2013-04-03 13:58:07 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestCase.st,v 1.96 2013-04-03 13:56:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestCase.st,v 1.97 2013-04-03 13:58:07 cg Exp $'
 !
 
 version_SVN