[Seaside] radioButton #value and group callback

[Nick Ager]

>
> It makes it impossible to render an option without a callback.
>

The following code works well for me with or without a callback defined. Am
i misunderstanding something?

WARadioButtonTag>>value: anObject
group isNil
ifTrue: [ ^ super value: anObject ].
group hasSelection
ifTrue: [ self selected: (group isSelected: anObject) ].
group hasCallback
ifTrue: [ super value: (group callbackValue: anObject) ]
ifFalse: [super value: anObject]

Nick
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.squeakfoundation.org/pipermail/seaside/attachments/20100418/1a573288/attachment.htm