more trace

SeasideSt · Jan 27, 2024 · 7039160 · 7039160
1 parent 6c07007
commit 7039160
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/...asol.package/WAWebDriverFunctionalTestCase.class/instance/testCORSFilterFunctionalTest.st b/...asol.package/WAWebDriverFunctionalTestCase.class/instance/testCORSFilterFunctionalTest.st
@@ -9,16 +9,19 @@ testCORSFilterFunctionalTest
 
 		self assert: (driver findElementByID: 'allowed-origins') getText equals: 'None'.
 		(((driver findElementByID: 'get-requests') findElementsByTagName: 'button') detect: [ :button | button getText = 'Same Origin' ]) click.
+		Transcript show: 'clicked 1'.
 		(Delay forMilliseconds: 1000) wait.
 		self assert: ((driver findElementByID: 'result') findElementByTagName: 'p') getText equals: 'Success'.
 
 		self clickRestart.
 		(((driver findElementByID: 'get-requests') findElementsByTagName: 'button') detect: [ :button | button getText = 'Cross Origin' ]) click.
+		Transcript show: 'clicked 2'.
 		(Delay forMilliseconds: 1000) wait.
 		self assert: ((driver findElementByID: 'result') findElementByTagName: 'p') getText equals: 'Error'.		
 
 		self clickRestart.		
 		((driver findElementsByTagName: 'button') detect: [ :button | button getText = 'Allow other origin' ]) click.
+		Transcript show: 'clicked 3'.
 		(((driver findElementByID: 'get-requests') findElementsByTagName: 'button') detect: [ :button | button getText = 'Same Origin' ]) click.
 		(Delay forMilliseconds: 1000) wait.
 		self assert: ((driver findElementByID: 'result') findElementByTagName: 'p') getText equals: 'Success'.