--- a/TestCase.st	Fri Dec 08 14:52:31 2000 +0100
+++ b/TestCase.st	Sun Dec 10 14:03:25 2000 +0100
@@ -7,6 +7,7 @@
 	category:'SUnit-Base'
 !
 
+
 !TestCase class methodsFor:'initialization'!
 
 initialize
@@ -189,4 +190,9 @@
 tearDown
 ! !
 
+!TestCase class methodsFor:'documentation'!
+
+version
+    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestCase.st,v 1.7 2000-12-10 13:03:25 cg Exp $'
+! !
 TestCase initialize!