WALiveRequestTest

• initialize
• renderContentOn:
• selection
• selection:

	count _ 0

	html form: [
		html textInputWithCallback: [:v ] liveCallback:
			[:text :h |
			h divNamed: 'forward' with:
				[h list: text do:
					[:c |
					h anchorWithAction: [self inform: c asString] text: c asString]]]
	].

	html form: [
		html textInputWithCallback: [:v ] liveCallback:
			[:text :h |
			h divNamed: 'backward' with:
				[h list: text reverse do:
					[:c |
					h anchorWithAction: [self inform: c asString] text: c asString]]]
	].

	html form: [
		html selectFromList: #(a b c) selected: #a callback: [:v] labels: [:ea | ea asString] liveCallback:
		[:item :h |
		h spanNamed: 'selection' with: item]].
	
	html anchorWithAction: [] liveAction: [:h | h spanNamed: 'time' with: Time now] text: 'Show time'. 
	html break.
	html anchorWithAction: [] liveAction: [:h | h spanNamed: 'time' with: 1/0] text: 'Live error'.
	
	html heading: 'Forward' level: 3.
	html divNamed: 'forward' with: ''.
	html heading: 'Backward' level: 3.
	html divNamed: 'backward' with: ''.
	html heading: 'Selection' level: 3.
	html spanNamed: 'selection' with: ''.
	html heading: 'Time' level: 3.
	html spanNamed: 'time' with: ''.

	^ #a