SCTestComponent4

• firstSent
• renderContentOn:
• secondSent
• thirdSent

• sendFirst
• sendSecond
• sendThird

• initialize

• canBeRoot

	^firstSent

 
	self firstSent
		ifFalse: [html
				anchorWithAction: [self sendFirst]
				text: 'first link'].
	html text: 'hello'.
	self secondSent
		ifFalse: [html cssId: 'second'.
			html
				anchorWithAction: [self sendSecond]
				text: 'second link'].
	self thirdSent
		ifFalse: [
			html cssId: 'third'.
			html
				anchorWithAction: [self sendThird]
				text: 'third link']

	^secondSent

	^thirdSent

	firstSent _ true

	secondSent _ true

	thirdSent _ true.
	self answer: 1234

	super initialize.
	self session registerObjectForBacktracking: self.
	firstSent _ false.
	secondSent _ false.
	thirdSent _ false

	^true