added test case

hpi-swa-teaching · Jul 11, 2024 · 5fe7ff2 · 5fe7ff2
1 parent 637be01
commit 5fe7ff2
Show file tree

Hide file tree

Showing 6 changed files with 15 additions and 29 deletions.
diff --git a/...isticsWorkbench-Tests.package/SWMainformModelTest.class/instance/testExportFileChooser.st b/...isticsWorkbench-Tests.package/SWMainformModelTest.class/instance/testExportFileChooser.st
@@ -0,0 +1,11 @@
+testing
+testExportFileChooser
+
+	| openWindowsCountStart openWindowsCountEnd |
+	openWindowsCountStart := (World submorphs select: [:morph |
+		morph isKindOf: SystemWindow]) size.
+	self mainformModel chart: 1 setSelected: true.
+	[self mainformModel onExportImageButtonClicked.
+	openWindowsCountEnd := (World submorphs select: [:morph |
+		morph isKindOf: SystemWindow]) size.
+	self assert: openWindowsCountEnd equals: openWindowsCountStart + 1]
diff --git a/...atisticsWorkbench-Tests.package/SWMainformModelTest.class/instance/testIsNewFileChosen.st b/...atisticsWorkbench-Tests.package/SWMainformModelTest.class/instance/testIsNewFileChosen.st
diff --git a/...bench-Tests.package/SWMainformModelTest.class/instance/testIsNewFileChosenReturnsFalse.st b/...bench-Tests.package/SWMainformModelTest.class/instance/testIsNewFileChosenReturnsFalse.st
diff --git a/packages/StatisticsWorkbench-Tests.package/SWMainformModelTest.class/methodProperties.json b/packages/StatisticsWorkbench-Tests.package/SWMainformModelTest.class/methodProperties.json
@@ -22,10 +22,9 @@
 		"testDefaultThemeSelection" : "JB 7/9/2024 14:18",
 		"testDefaultYAxisSelection" : "JB 7/9/2024 14:18",
 		"testEditYAxisSelection" : "JB 7/9/2024 14:18",
+		"testExportFileChooser" : "JB 7/11/2024 13:33",
 		"testGetAllCharts" : "JB 7/9/2024 14:19",
 		"testHPIThemeSelection" : "JB 7/9/2024 14:19",
-		"testIsNewFileChosen" : "JB 6/20/2024 11:51",
-		"testIsNewFileChosenReturnsFalse" : "JB 6/20/2024 11:51",
 		"testLightThemeSelection" : "JB 7/9/2024 14:19",
 		"testObserverNotification" : "PAR 8/6/2021 12:55",
 		"testOnVisualizeButtonClicked" : "JB 7/9/2024 14:20",

diff --git a/packages/StatisticsWorkbench-UI.package/SWMainformModel.class/instance/exportIMG..st b/packages/StatisticsWorkbench-UI.package/SWMainformModel.class/instance/exportIMG..st
@@ -9,5 +9,5 @@ exportIMG: aDiagram
 		window := aDiagram openInWindowLabeled: ''.
 		aDiagram exportButton hide.
 		[PNGReadWriter putForm: (aDiagram imageForm) onFileNamed: filePath] on: Error do: [:error |
-			error pass]].
-	window delete
+			error pass].
+		window delete]
diff --git a/packages/StatisticsWorkbench-UI.package/SWMainformModel.class/methodProperties.json b/packages/StatisticsWorkbench-UI.package/SWMainformModel.class/methodProperties.json
@@ -34,7 +34,7 @@
 		"defaultYAxisSelection" : "s 6/11/2024 17:36",
 		"defaultYValue" : "s 6/30/2024 18:24",
 		"editYAxisValues" : "JB 7/9/2024 13:29",
-		"exportIMG:" : "JB 7/10/2024 15:10",
+		"exportIMG:" : "JB 7/11/2024 13:16",
 		"getAllCharts" : "JB 6/12/2024 15:02",
 		"getClassForChart:" : "JB 7/9/2024 13:47",
 		"getYAxis" : "JB 6/12/2024 15:08",