[Seaside] Re: Seaside and urls

[Sabine Knöfel]

Hi Philipe,

great. I will use it as soon as I switch to 3.0

Regards
Sabine


On Wed, Nov 13, 2013 at 10:19 PM, Philippe Marschall [via Smalltalk] <
ml-node+s1294792n4721861h86 at n4.nabble.com> wrote:

> On Wed, Nov 13, 2013 at 4:59 PM, Esteban Lorenzano <[hidden email]<http://user/SendEmail.jtp?type=node&node=4721861&i=0>>
> wrote:
>
> > I'm using Seaside-REST for that (even it is not its purpose), but I
> needed to hack it a bit (bah, not a BIT really...)
> >
> > See:
> >
> > in  WARestfulFilter subclass: #EveRestFilter:
> >
> > EveRestFilter >>#shoppingList
> >         <get>
> >         <path: 'shopping-list'>
> >
> >         self continueWithRoot: [ :root |
> >                 root startOn: EveUNOPSShoppingListPanel new ].
> >
> > EveRestFilter >>#continueWithRoot: aBlock
> >         "Continues the execution of the application.
> >          I will pass aBlock to the root class of app, which I assume is
> a REApplication.
> >          Otherwise, this will fail"
> >         | requestContext application session rootComponent |
> >
> >         requestContext := self requestContext.
> >         application := requestContext application.
> >         session := self obtainSessionWithApplication: application
> context: requestContext.
> >
> >         requestContext
> >                 push: session
> >                 during: [
> >                         rootComponent := requestContext
> rootComponentIfAbsent: [ nil ].
> >                         rootComponent ifNil: [
> >                                 rootComponent := (application
> preferenceAt: #rootClass) new.
> >                                 requestContext rootComponent:
> rootComponent ].
> >                         rootComponent do: aBlock.
> >                         self next handleFiltered: requestContext ].
> >
> > EveRestFilter >>#obtainSessionWithApplication: application context:
> requestContext
> >         | sessionKey session |
> >
> >         sessionKey  := application trackingStrategy keyFromContext:
> requestContext.
> >         session := sessionKey ifNotNil: [
> >                 application cache
> >                         at: sessionKey
> >                         ifAbsent: [ nil] ].
> >
> >         session  ifNil: [
> >                 session := application newSession.
> >                 application register: session ].
> >
> >         ^ session
> >
> >
> > then in the main component:
> >
> > EveMainComponent>>startOn: aComponent
> >         contentComponent show: aComponent
> >
> >
> >
> > is probably not the best way to do it, but is the easiest way I found,
> and it works :)
>
> In Seaside 3.1 there is WARestfulComponentFilter >> #startSessionWithRoot:
>
> Cheers
> Philippe
> _______________________________________________
> seaside mailing list
> [hidden email] <http://user/SendEmail.jtp?type=node&node=4721861&i=1>
> http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside
>
>
> ------------------------------
>  If you reply to this email, your message will be added to the discussion
> below:
> http://forum.world.st/Seaside-and-urls-tp4721764p4721861.html
>  To start a new topic under Seaside General, email
> ml-node+s1294792n86180h75 at n4.nabble.com
> To unsubscribe from Seaside, click here<http://forum.world.st/template/NamlServlet.jtp?macro=unsubscribe_by_code&node=1310907&code=c2FiaW5lLmtub2VmZWxAZ21haWwuY29tfDEzMTA5MDd8MTA0OTM5MTYx>
> .
> NAML<http://forum.world.st/template/NamlServlet.jtp?macro=macro_viewer&id=instant_html%21nabble%3Aemail.naml&base=nabble.naml.namespaces.BasicNamespace-nabble.view.web.template.NabbleNamespace-nabble.view.web.template.NodeNamespace&breadcrumbs=notify_subscribers%21nabble%3Aemail.naml-instant_emails%21nabble%3Aemail.naml-send_instant_email%21nabble%3Aemail.naml>
>




--
View this message in context: http://forum.world.st/Seaside-and-urls-tp4721764p4721941.html
Sent from the Seaside General mailing list archive at Nabble.com.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.squeakfoundation.org/pipermail/seaside/attachments/20131114/72c509cf/attachment-0001.htm