[Seaside] Re: Redirect to the previous page

[Sebastian Van Lacke]

Thanks Pat, good idea! I have implemented it as you suggested, and works
perfectly.

RootComponent>>login

    previousComponent := currentComponent.
    currentComponent := CSLogin new

RootComponent>>previousPage

    currentComponent := previousComponent

RootComponent>>registerAnnouncements

    self session announcer on: LoginSelected do: [ :it | self login ].
    self session announcer on: SuccessfullLogin do: [ :it | self
previousPage ].


Sebastian
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.squeakfoundation.org/pipermail/seaside/attachments/20110126/7fe5869f/attachment.htm