fixed a bug in the tests and cleanup after test with opened windows

hpi-swa-teaching · Jul 10, 2021 · 540912c · 540912c
1 parent 8b8bcbd
commit 540912c
Show file tree

Hide file tree

Showing 4 changed files with 10 additions and 5 deletions.
diff --git a/...lorationViewTests.class/instance/testMethodSelectionUpdatesOnChangingMorphInPlayground.st b/...lorationViewTests.class/instance/testMethodSelectionUpdatesOnChangingMorphInPlayground.st
@@ -1,11 +1,15 @@
 tests
 testMethodSelectionUpdatesOnChangingMorphInPlayground
 
-	"| exampleMethods allButtonMorphs |
+	| exampleMethods allButtonMorphs view |
 
+	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"
+	(allButtonMorphs at: 1) doButtonAction.
+	view abandon
diff --git a/...ages/MorphicAPIExplorer-Tests.package/MEXExplorationViewTests.class/methodProperties.json b/...ages/MorphicAPIExplorer-Tests.package/MEXExplorationViewTests.class/methodProperties.json
@@ -19,7 +19,7 @@
 		"testDependentMorphDisplaysCorrectIcon" : "SC 6/21/2021 13:03",
 		"testEvaluateCodeReturnsCorrectMorph" : "lk 7/24/2019 15:00",
 		"testExpandableTreeElementsExpanded" : "SC 6/28/2021 17:13",
-		"testMethodSelectionUpdatesOnChangingMorphInPlayground" : "SC 7/5/2021 04:18",
+		"testMethodSelectionUpdatesOnChangingMorphInPlayground" : "SC 7/5/2021 19:24",
 		"testMorphBoxContainsStandardMorphs" : "TB 6/7/2021 12:04",
 		"testMorphSpacing" : "PC 6/25/2021 14:27",
 		"testOpenExplorationViewForOpensAnExplorationView" : "FFN 5/21/2019 16:23",

diff --git a/.../MEXOverViewTestsWithFullCategories.class/instance/testCategoryButtonToExplorationView.st b/.../MEXOverViewTestsWithFullCategories.class/instance/testCategoryButtonToExplorationView.st
@@ -10,4 +10,5 @@ testCategoryButtonToExplorationView
 		[:aMorph| aMorph isKindOf: MEXPluggableButtonMorph])
 		select: [:aMorph | aMorph label isKindOf: MEXScalableImageMorph]) first performAction.
 	self assert: ((self getOpenWindowsWithModel: MEXToolExplorationView) size = (openExplorationViews + 1)).
-	self assert: ((self getOpenWindowsWithModel: MEXToolOverView) size = (openOverViews - 1))
+	self assert: ((self getOpenWindowsWithModel: MEXToolOverView) size = (openOverViews - 1)).
+	view abandon
diff --git a/...cAPIExplorer-Tests.package/MEXOverViewTestsWithFullCategories.class/methodProperties.json b/...cAPIExplorer-Tests.package/MEXOverViewTestsWithFullCategories.class/methodProperties.json
@@ -7,7 +7,7 @@
 		"setUp" : "PM 6/20/2021 11:33",
 		"testBuildChildrenWithReturnsCollectionOfSpecs" : "KT 6/4/2021 10:04",
 		"testBuildChildrenWithReturnsCollectionWithCorrectSizeForFilledCategories" : "KT 6/3/2021 19:30",
-		"testCategoryButtonToExplorationView" : "PM 6/20/2021 11:31",
+		"testCategoryButtonToExplorationView" : "SC 7/5/2021 19:22",
 		"testSpecFrameAtForReturnsFullHeightLayoutFrameForOneRow" : "KT 6/3/2021 19:20",
 		"testSpecFrameAtForReturnsFullWidhtLayoutFrameLessCategoriesThanRows" : "lk 7/24/2019 16:48",
 		"testSpecFrameAtForReturnsLayoutFrameInsideWindowBounds" : "lk 7/24/2019 16:48",