--- a/Tools__TestRunner2.st Sun Sep 08 17:01:02 2019 +0200
+++ b/Tools__TestRunner2.st Sun Sep 08 17:01:48 2019 +0200
@@ -1199,7 +1199,7 @@
| selection |
selection := self packageList selectionHolder value.
- ^selection size = 1
+ ^selection size == 1
ifTrue:[selection anyOne]
ifFalse:[nil]
@@ -1719,9 +1719,9 @@
classCategoryOrPackageTabIndexHolder ifNil:
[classCategoryOrPackageTabIndexHolder := nil asValue.
classCategoryOrPackageTabIndexHolder onChangeEvaluate:
- [classCategoryOrPackageTabIndexHolder value = 1
+ [classCategoryOrPackageTabIndexHolder value == 1
ifTrue:[self classCategoryList selectionChanged].
- classCategoryOrPackageTabIndexHolder value = 2
+ classCategoryOrPackageTabIndexHolder value == 2
ifTrue:[self packageList selectionChanged]]].
^classCategoryOrPackageTabIndexHolder
@@ -2300,10 +2300,10 @@
updateTimestampFormat
- (results isEmptyOrNil or:[results size = 1])
+ (results isEmptyOrNil or:[results size == 1])
ifTrue:[timestampFormat := nil].
- ((results collect:[:each|each timestamp] as:Set) size = 1)
+ ((results collect:[:each|each timestamp] as:Set) size == 1)
ifTrue: [timestampFormat := ' (%h:%m)']
ifFalse:[timestampFormat := ' (%(month)-%(day) %h:%m)']
@@ -2339,7 +2339,7 @@
children := (tests asSortedCollection: [:a :b|a selector < b selector])
collect:[:test|self makeTestEntryFor: test result: result].
entry setChildren: children.
- (entry result ~= #passed and:[results size = 1]) ifTrue:[entry expand].
+ (entry result ~= #passed and:[results size == 1]) ifTrue:[entry expand].
^entry
"Created: / 19-03-2010 / 08:41:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
@@ -2374,7 +2374,7 @@
| entry children |
entry := ListEntry labeled: 'Test Results'.
results isEmptyOrNil ifTrue:[^entry].
- children := results size = 1
+ children := results size == 1
ifTrue:
[(self makeResultEntryFor: results anyOne) getChildren]
ifFalse: