join #onChange: and #liveCallback:

Hi all,
      I'm sending #onChange: (with a ShoreProgressUpdater as argument ) and #liveCallback: messages to a intance of WASelectTag, but when any element  is selected only the liveCallback block is evaluated. 
  How could I evaluate both Updater block and liveCallback block when any element is selected ?
I attach an example. you should add ShoreStandardScripts, SULibrary and ShoreStandardStyles libraries.

I am working with:
         SeasideAsync-mb.41,
         ShoreComponents-2.6-pk.34, 
         Scriptaculous-lr.122 and
         Seaside2.6b1-mb.8/Squeak3.8.

Thanks in advance.


UpdaterExample>>renderContentOn: aRenderer

    | id |
    aRenderer div id: #shoreProgressOverlay; class: #hidden.
    aRenderer div id: #shoreProgressSpinner; class: #hidden; with: [
        aRenderer image url: (ShoreFileProvider new urlFor: 'ShoreComponent/spinner') ].
    id := ShoreComponent newId.   
    aRenderer select
            list: #(1 2  3 4);
            onChange: ( aRenderer updater
                id: id;
                callback: [:h |
                    'evaluating' explore.
                    (Delay forMilliseconds: 600) wait.
                    ]);
            liveCallback: [:s :h | h span id: 'selection'; with: s. ].
    aRenderer span id: 'selection'; with: ''.

_______________________________________________
Seaside mailing list
[hidden email]
http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside