Multiselect broken

> WAKomEncoded39 startOn: 9090
>
> To reproduce point your browser to
> http://localhost:9090/seaside/tests/scriptaculous , then
> click on "Form" tab. This is the output:
>
> MessageNotUnderstood: WARenderCanvas>>multiSelect
>
>     * WARenderCanvas(Object)>>doesNotUnderstand:
> #multiSelect
>
>           self    a WARenderCanvas
>           temps
>           aMessage    multiSelect
>           inst vars
>           currentBrush    nil
>           parentBrush    a WAFormTag
>           painter    a SUFormTest
>           context    a WARenderingContext
>           callbacks    a WACallbackRegistry
>
>     * [] in SUFormTest>>renderMultiSelectListOn: {[:fid
> :mid | html multiSelect size: 3; list: (1 to: 9); selected: mu...]}
>
>           self    a SUFormTest
>           temps
>           html    a WARenderCanvas
>           fid    'id43'
>           mid    'id44'
>           value    nil
>           r    nil
>           inst vars
>           decoration    a WAStateHolder(a SUFormTest)
>           textInput    'Text Input'
>           textArea    'Text Area'
>           checkBox    false
>           radioButton    1
>           selectList    1
>           mutliSelectList    (1 to: 2)
>
>     * [] in SUFormTest>>renderLabel:control:model:on:
> {[aBlock value: fid value: (mid := html nextId)]}
>
>           self    a SUFormTest
>           temps
>           aString    'Multi-Select-List'
>           aBlock    [] in
> SUFormTest>>renderMultiSelectListOn: {[:fid :mid | html
> multiSelect size: 3; list: (1 to:...etc...
>           anObject    (1 to: 2)
>           html    a WARenderCanvas
>           fid    'id43'
>           mid    'id44'
>           inst vars
>           decoration    a WAStateHolder(a SUFormTest)
>           textInput    'Text Input'
>           textArea    'Text Area'
>           checkBox    false
>           radioButton    1
>           selectList    1
>           mutliSelectList    (1 to: 2)
>
>     * BlockContext>>renderOn:
>
>           self    [] in
> SUFormTest>>renderLabel:control:model:on: {[aBlock value:
> fid value: (mid := html nextId)]}
>           temps
>           aRenderer    a WARenderCanvas
>           inst vars
>           sender    BlockContext>>renderOn:
>           pc    117
>           stackp    0
>           nargs    0
>           startpc    110
>           home    SUFormTest>>renderLabel:control:model:on:
>
>     * WAFormTag(WATagBrush)>>within:
>
>           self    a WAFormTag
>           temps
>           aBlock    [] in
> SUFormTest>>renderLabel:control:model:on: {[aBlock value:
> fid value: (mid := html nextId)]}
>           inst vars
>           parent    a WADivTag
>           canvas    a WARenderCanvas
>           isClosed    false
>           attributes    a WAHtmlAttributes
>           defaultAction    nil
>
>
>  ________________________________
>  Ne gardez plus qu'une seule adresse mail ! Copiez vos mails vers Yahoo!
> Mail
> _______________________________________________
> Seaside mailing list
> [hidden email]
> http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside
>
>