--- a/TestRunner.st	Thu Nov 07 09:55:59 2002 +0100
+++ b/TestRunner.st	Thu Nov 07 12:37:13 2002 +0100
@@ -920,8 +920,8 @@
     self removeFromFailedTests:caseName.
     self addToPassedTests:caseName.
 
-    Transcript show:'passed: '; showCR:caseName.
-    Transcript show:'passed: '; showCR:caseName className.
+"/    Transcript show:'passed: '; showCR:caseName.
+"/    Transcript show:'passed: '; showCR:caseName className.
 
     (cls := Smalltalk classNamed:caseName) notNil ifTrue:[
         cls rememberPassedTestRun
@@ -1124,5 +1124,5 @@
 !TestRunner class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestRunner.st,v 1.42 2002-11-07 08:55:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestRunner.st,v 1.43 2002-11-07 11:37:13 cg Exp $'
 ! !