--- a/TestSuite.st Wed Aug 03 16:31:42 2011 +0200
+++ b/TestSuite.st Wed Aug 03 16:31:56 2011 +0200
@@ -142,14 +142,14 @@
] sunitEnsure:[
resetResources ifTrue:[
TestResource resetResources: self resources
- ]
+ ].
].
^result
- "Modified: / 29-07-2011 / 12:09:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
"Modified: / 30-07-2011 / 12:40:12 / cg"
"Created: / 31-07-2011 / 13:57:25 / cg"
+ "Modified: / 03-08-2011 / 14:11:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
run:aResult beforeEachTestCaseDo:block1 afterEachTestCaseDo:block2
@@ -197,7 +197,7 @@
!TestSuite class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/goodies/sunit/TestSuite.st,v 1.25 2011-08-01 07:42:45 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/goodies/sunit/TestSuite.st,v 1.26 2011-08-03 14:31:56 vrany Exp $'
!
version_SVN