TestCase.st
changeset 72 a39bc71cdc5b
parent 70 2ff4508f476d
child 73 dcd22ffe7d1f
--- a/TestCase.st	Fri Jun 21 11:01:45 2002 +0200
+++ b/TestCase.st	Tue Jul 02 14:36:56 2002 +0200
@@ -16,9 +16,7 @@
     (Class includesSelector:#sunitName) ifFalse:[
         Smalltalk fileIn:'extensions.st' inPackage:(self package)
     ].    
-    TestFailure isLoaded ifFalse:[
-        TestFailure autoload
-    ].
+    TestFailure autoload
 
     "
      self initialize
@@ -341,6 +339,6 @@
 !TestCase class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestCase.st,v 1.24 2002-06-19 12:20:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestCase.st,v 1.25 2002-07-02 12:36:56 stefan Exp $'
 ! !
 TestCase initialize!