[Seaside] optionGroup -> callback does not fire

[Sabine Knöfel]

I want to use an optionGroup and copied the code from
WAInputElementContainer>>renderNestedSelectionOn:.
The callback does not fire. See below.
Is this a bug?
How can I force the callback to fire?

Sabine

|selectTag |
selectTag := html select.
selectTag
	callback: [ :value | value inspect ];
	selected: 'Lisp';
	with: [#(#('Functional' #('Haskell ' 'Lisp' 'ML')) #('Dataflow' #('G' 'Max'
'Prograph')))
	do: [ :list | 
		html optionGroup
			label: list first;
			with: [
				list second	
					do: [ :each | 
						html option
							value: each with: selectTag;
							with: each ] ] ] ].



--
View this message in context: http://forum.world.st/optionGroup-callback-does-not-fire-tp4682815.html
Sent from the Seaside General mailing list archive at Nabble.com.