-
Notifications
You must be signed in to change notification settings - Fork 1
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
- Loading branch information
Showing
7 changed files
with
29 additions
and
13 deletions.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
4 changes: 4 additions & 0 deletions
4
...rphicAPIExplorer-Core.package/MEXToolExplorationView.class/instance/deselectAllMethods.st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,4 @@ | ||
accessing | ||
deselectAllMethods | ||
|
||
self selectedMethods do: [:aMethod | self setSelectionFor: aMethod with: false] |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
3 changes: 1 addition & 2 deletions
3
...APIExplorer-Tests.package/MEXExplorationViewTests.class/instance/loadMorphWithMethods..st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,5 +1,4 @@ | ||
running | ||
loadMorphWithMethods: anOrderedCollection | ||
|
||
anOrderedCollection do: [:aMethod | explorationView setSelectionFor: aMethod with: true]. | ||
explorationView evaluateMethodsForMorph: explorationView defaultMorph | ||
anOrderedCollection do: [:aMethod | explorationView setSelectionFor: aMethod with: true] |
16 changes: 13 additions & 3 deletions
16
...lorationViewTests.class/instance/testMethodSelectionUpdatesOnChangingMorphInPlayground.st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,11 +1,21 @@ | ||
tests | ||
testMethodSelectionUpdatesOnChangingMorphInPlayground | ||
|
||
"| exampleMethods allButtonMorphs | | ||
| exampleMethods allButtonMorphs view methodTree | | ||
|
||
view := builder build: explorationView. | ||
view openInWorld. | ||
exampleMethods := {explorationView methodList at: 1. explorationView methodList at: 2} asOrderedCollection. | ||
|
||
self loadMorphWithMethods: exampleMethods. | ||
explorationView evaluateCode: self sampleCode. | ||
explorationView saveCurrentMorph. | ||
allButtonMorphs := self getButtonMorphCollectionInDefaultMorphBoxFor: explorationView. | ||
(allButtonMorphs at: 1) doButtonAction" | ||
methodTree := self getMethodTreeFor: explorationView. | ||
allButtonMorphs do: [:aButtonMorph | aButtonMorph doButtonAction. | ||
self assert: (((((methodTree items collect: [:anItem | anItem complexContents item isSelected == false]) occurrencesOf: false) == 0) | ||
and: (methodTree selectedMorphs size == 0)) | ||
or: ((methodTree items first complexContents item isSelected) | ||
and: (methodTree items second complexContents item isSelected) | ||
and: ((((methodTree items allButFirst: 2) collect: [:anItem | anItem complexContents item isSelected == false]) occurrencesOf: false) == 0) | ||
and: (methodTree selectedMorphs size == 2)))]. | ||
view abandon |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters