WAYesOrNoDialogTest

• testNo
• testYes

	| form |
	self newApplicationWithRootClass: WAYesOrNoDialog.
	form := self establishSession forms first.
	self submitForm: form pressingButton: (form buttonWithValue: 'No').
	self assert: (self componentAnswered: false)

	| form |
	self newApplicationWithRootClass: WAYesOrNoDialog.
	form := self establishSession forms first.
	self submitForm: form pressingButton: (form buttonWithValue: 'Yes').
	self assert: (self componentAnswered: true)