--- a/TestResult.st	Tue Sep 04 15:07:08 2001 +0200
+++ b/TestResult.st	Tue Sep 04 21:03:35 2001 +0200
@@ -30,13 +30,13 @@
 !
 
 signalErrorWith: aString 
-	self error sunitSignalWith: aString
+        self error raiseErrorString: aString
 
     "Modified: / 21.6.2000 / 10:11:07 / Sames"
 !
 
 signalFailureWith: aString 
-	self failure sunitSignalWith: aString
+        self failure raiseErrorString: aString
 
     "Modified: / 21.6.2000 / 10:11:20 / Sames"
 ! !
@@ -141,5 +141,5 @@
 !TestResult class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestResult.st,v 1.5 2001-09-04 13:07:03 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestResult.st,v 1.6 2001-09-04 19:03:35 cg Exp $'
 ! !