#OTHER by mawalch
authormawalch
Tue, 16 Aug 2016 14:41:22 +0200
changeset 319f525a38861f1
parent 316 28efe39657f5
child 320 eaedd91b98a6
#OTHER by mawalch
class: Builder::TestReportFormat
typo
reports/Builder__TestReportFormat.st
     1.1 --- a/reports/Builder__TestReportFormat.st	Thu Mar 31 23:58:20 2016 +0200
     1.2 +++ b/reports/Builder__TestReportFormat.st	Tue Aug 16 14:41:22 2016 +0200
     1.3 @@ -277,18 +277,18 @@
     1.4  writeTestCase:testcase outcome:outcome time:time exception: exception stacktrace:stacktrace
     1.5      | result |
     1.6  
     1.7 -    outcome result == TestResult statePass ifTrue:[ 
     1.8 +    outcome result == TestResult statePass ifTrue:[
     1.9          result := #pass.
    1.10 -    ] ifFalse:[ 
    1.11 -        outcome result == TestResult stateFail ifTrue:[ 
    1.12 +    ] ifFalse:[
    1.13 +        outcome result == TestResult stateFail ifTrue:[
    1.14              result := #failure.
    1.15              failures := failures + 1
    1.16 -        ] ifFalse:[ 
    1.17 -            outcome result == TestResult stateError ifTrue:[ 
    1.18 +        ] ifFalse:[
    1.19 +            outcome result == TestResult stateError ifTrue:[
    1.20                  result := #error.
    1.21                  errors := errors + 1.
    1.22 -            ] ifFalse:[ 
    1.23 -                outcome result == TestResult stateSkip ifTrue:[ 
    1.24 +            ] ifFalse:[
    1.25 +                outcome result == TestResult stateSkip ifTrue:[
    1.26                      result := #skip.
    1.27                      skipped := skipped + 1
    1.28                  ] ifFalse:[
    1.29 @@ -298,11 +298,11 @@
    1.30          ].
    1.31      ].
    1.32  
    1.33 -    stream tab; 
    1.34 -            nextPutAll: '<testcase classname="'; 
    1.35 -            nextPutAll: (self encode: testcase nameForHDTestReport); 
    1.36 -            nextPutAll: '" name="'; 
    1.37 -            nextPutAll: (self encode: testcase selectorForHDTestReport); 
    1.38 +    stream tab;
    1.39 +            nextPutAll: '<testcase classname="';
    1.40 +            nextPutAll: (self encode: testcase nameForHDTestReport);
    1.41 +            nextPutAll: '" name="';
    1.42 +            nextPutAll: (self encode: testcase selectorForHDTestReport);
    1.43              nextPutAll: '" time="'; print: (time ? 0) / 1000.0; nextPutAll: '">'; cr.
    1.44  
    1.45      result == #skip ifTrue:[
    1.46 @@ -313,12 +313,12 @@
    1.47  
    1.48              exception isNil ifTrue:[
    1.49                  type := 'unknown exception'.
    1.50 -                message := 'unknown exception occured (no exception details available)'
    1.51 +                message := 'unknown exception occurred (no exception details available)'
    1.52              ] ifFalse:[
    1.53                  type := exception class name.
    1.54                  message := exception messageText ifNil:[ exception description ].
    1.55              ].
    1.56 -            
    1.57 +
    1.58  
    1.59              stream tab; tab;
    1.60                  nextPut:$<; nextPutAll: result;
    1.61 @@ -338,10 +338,10 @@
    1.62              stream nextPutAll:'    <system-out><!![CDATA['; cr.
    1.63              self writeCDATA: outcome collectedOutput.
    1.64              stream nextPutAll:']]> </system-out>'; cr.
    1.65 -        ].   
    1.66 +        ].
    1.67      ].
    1.68  
    1.69 -    stream tab; 
    1.70 +    stream tab;
    1.71              nextPutAll: '</testcase>'; cr.
    1.72  
    1.73