reports/extensions.st
changeset 55 d6e89853991f
parent 54 d37eaf8fc04b
child 146 0cf5a47e69fc
--- a/reports/extensions.st	Thu Jan 12 19:09:39 2012 +0100
+++ b/reports/extensions.st	Thu Jan 12 19:09:48 2012 +0100
@@ -0,0 +1,60 @@
+"{ Package: 'stx:goodies/builder/reports' }"!
+
+!TestCase methodsFor:'accessing'!
+
+nameForHDTestReport
+
+    ^(self class package asString replaceAll: $: with: $.; replaceAll: $/ with: $.) , '.' , self name
+
+    "
+        Object nameForHDTestReport    
+        SVN::Repository nameForHDTestReport
+    "
+
+    "Created: / 01-04-2011 / 16:09:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 06-04-2011 / 13:36:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!TestCase methodsFor:'accessing'!
+
+selectorForHDTestReport
+
+	^testSelector
+
+! !
+
+!TestCase methodsFor:'accessing'!
+
+timeout
+    "Returns a default timeout (sec) for the test.
+     If nil is returned, no timeout enforced.
+
+    Note that the timeout is set only when running under
+    report runner, interactive tools does not use it"
+
+    ^60"sec"
+
+    "Created: / 12-01-2012 / 17:48:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!TestCase class methodsFor:'testing'!
+
+isJUnitTestCaseProxy
+
+	^false
+
+! !
+
+!TestCase class methodsFor:'testing'!
+
+isTestletTestCaseProxy
+
+	^false
+
+! !
+
+!stx_goodies_builder_reports class methodsFor:'documentation'!
+
+extensionsVersion_CVS
+    ^ '$Header$'
+! !
\ No newline at end of file