[Seaside] [bug] Scriptaculous problem

[Keith Hodges]

Using the Pier widget PRTabbedPagesWidget (available in pieraddons)
which implements kalsey tabs, the tabs do not display their style
changes in IE.

The code which is perfroming the switch is as follows:

scriptTabSelectedOn: aScript
     aScript element
        id: (self uid: 'head' at: (self
            findIndex: self selectedPrior
            ifAbsent: [ ]));
        removeClassName: 'option-selected'.
        
    aScript element
        id: (self uid: 'head' at: (self
            findIndex: self selected
            ifAbsent: [ ^ self ]));
        addClassName: 'option-selected'.
    
    self scriptSelectedOn: aScript

best regards

Keith