--- a/TestCase.st	Tue Oct 16 13:41:47 2001 +0200
+++ b/TestCase.st	Tue Oct 16 13:57:46 2001 +0200
@@ -14,10 +14,7 @@
     "ensure, that the sunit extensions are loaded"
 
     (Class implements:#sunitName) ifFalse:[
-	(Smalltalk fileIn:'extensions.st' inPackage:(self package))
-	ifFalse:[
-	    (Smalltalk fileIn:'source/extensions.st' inPackage:(self package))
-	]
+	Smalltalk fileIn:'extensions.st' inPackage:(self package)
     ].    
     TestFailure isLoaded ifFalse:[
 	TestFailure autoload
@@ -213,6 +210,6 @@
 !TestCase class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestCase.st,v 1.13 2001-10-16 11:41:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestCase.st,v 1.14 2001-10-16 11:57:46 cg Exp $'
 ! !
 TestCase initialize!