"clean urls" in pier

> Hi,
>
> One of the thing I'm missing with Pier is "clean urls" -- without the
> session stuff.
>
> I played with the code a bit, followed advices from
> http://onsmalltalk.com/clean-urls-in-seaside to get rid of _s, and
> then modifyed the visitInternalLink in PRReferenceRenderer so that
> links do not include _k. I simply do something like that:
>
> anchor url: 'http://localhost:8080/seaside/pier', aLink reference
>
> which sets the url fully, and apparently everything seems to work as
> hoped -- links indicated in pier are now fully formed and without _s
> and _k, while dynamically generated links still work so for example I
> can still log in and edit pages as usual... but in "normal viewing
> mode" I get clean urls.
>
> My question is, am I breaking something I'm not seeing (as apparently
> things works as I want) by doing that ? is that the correct way to do
> it ?
>
> thanks,
>
> --
> Nicolas Roard
> "I love deadlines. I like the whooshing sound
> they make as they fly by." -- Douglas Adams
> _______________________________________________
> Magritte, Pier and Related Tools ...
> https://www.iam.unibe.ch/mailman/listinfo/smallwiki
>

> On Wed, Jul 1, 2009 at 1:47 PM, Lukas Renggli<[hidden email]>  
> wrote:
>>> My question is, am I breaking something I'm not seeing (as  
>>> apparently
>>> things works as I want) by doing that ? is that the correct way to  
>>> do
>>> it ?
>>
>> I don't know, but certainly sounds cool. If you commit the changes I
>> am sure people will quickly find out ;-)
>
> ah :)
>
> well, really this is all I'm doing... I followed ramon's blog
> explanations, and added a subclass of WASession with the following
> methods:
>
> returnResponse: aResponse
>    (self currentRequest cookieAt: self application handlerCookieName)
>        ifNil: [ aResponse addCookie: self sessionCookie ].
>    ^ super returnResponse: aResponse
>
> actionUrlForKey: aString
>    | url |
>    url := super actionUrlForKey: aString.
>    (self currentRequest cookieAt: self application handlerCookieName)
>            ifNotNil: [ url parameters removeKey: self application
> handlerField ].
>    ^ url
>
> Then I modified visitInternalInk in PRReferenceRender like this:
>
> visitInternalLink: aLink
> | anchor |
> anchor := self anchorFor: aLink.
> anchor class: 'internal'; goto: (self contextForLink: aLink).
> aLink anchor isNil ifFalse: [
> anchor url fragment: (aLink anchor
> select: [ :each | each isAlphaNumeric ]) ].
>
> anchor url: 'http://test.roard.com/seaside/pier', aLink reference.
>
> (aLink hasCounter and: [ html callbacks isKindOf: WACallbackRegistry
> ]) ifTrue: [
> anchor url addParameter: (html callbacks
> registerCallback: [ aLink incrementCounter ]) ].
>
> anchor with: [ self visitLink: aLink ]
>
>
> This can certainly be cleaned/simplified.
>
> --
> Nicolas Roard
> "I love deadlines. I like the whooshing sound
> they make as they fly by." -- Douglas Adams
> _______________________________________________
> Magritte, Pier and Related Tools ...
> https://www.iam.unibe.ch/mailman/listinfo/smallwiki

> Hi! Is this stuff the same of the new Pier 1.2 ANN about clean URLs ?
>
> Thanks,
>
> Mariano
>
> On Wed, Jul 1, 2009 at 2:17 PM, Adrian Lienhard <[hidden email]> wrote:
>>
>> For what its worth, I described how we implemented clean URLs in
>> cmsbox.com some time ago:
>>
>>
>> http://lists.squeakfoundation.org/pipermail/seaside-dev/2008-August/001012.html
>>
>> Cheers,
>> Adrian
>>
>> On Jul 1, 2009, at 15:54 , Nicolas Roard wrote:
>>
>>> On Wed, Jul 1, 2009 at 1:47 PM, Lukas Renggli<[hidden email]> wrote:
>>>>>
>>>>> My question is, am I breaking something I'm not seeing (as apparently
>>>>> things works as I want) by doing that ? is that the correct way to do
>>>>> it ?
>>>>
>>>> I don't know, but certainly sounds cool. If you commit the changes I
>>>> am sure people will quickly find out ;-)
>>>
>>> ah :)
>>>
>>> well, really this is all I'm doing... I followed ramon's blog
>>> explanations, and added a subclass of WASession with the following
>>> methods:
>>>
>>> returnResponse: aResponse
>>>   (self currentRequest cookieAt: self application handlerCookieName)
>>>       ifNil: [ aResponse addCookie: self sessionCookie ].
>>>   ^ super returnResponse: aResponse
>>>
>>> actionUrlForKey: aString
>>>   | url |
>>>   url := super actionUrlForKey: aString.
>>>   (self currentRequest cookieAt: self application handlerCookieName)
>>>           ifNotNil: [ url parameters removeKey: self application
>>> handlerField ].
>>>   ^ url
>>>
>>> Then I modified visitInternalInk in PRReferenceRender like this:
>>>
>>> visitInternalLink: aLink
>>>        | anchor |
>>>        anchor := self anchorFor: aLink.
>>>        anchor class: 'internal'; goto: (self contextForLink: aLink).
>>>        aLink anchor isNil ifFalse: [
>>>                anchor url fragment: (aLink anchor
>>>                        select: [ :each | each isAlphaNumeric ]) ].
>>>
>>>        anchor url: 'http://test.roard.com/seaside/pier', aLink reference.
>>>
>>>        (aLink hasCounter and: [ html callbacks isKindOf:
>>> WACallbackRegistry
>>> ]) ifTrue: [
>>>                anchor url addParameter: (html callbacks
>>>                        registerCallback: [ aLink incrementCounter ]) ].
>>>
>>>        anchor with: [ self visitLink: aLink ]
>>>
>>>
>>> This can certainly be cleaned/simplified.
>>>
>>> --
>>> Nicolas Roard
>>> "I love deadlines. I like the whooshing sound
>>> they make as they fly by." -- Douglas Adams
>>> _______________________________________________
>>> Magritte, Pier and Related Tools ...
>>> https://www.iam.unibe.ch/mailman/listinfo/smallwiki
>>
>> _______________________________________________
>> Magritte, Pier and Related Tools ...
>> https://www.iam.unibe.ch/mailman/listinfo/smallwiki
>
>
> _______________________________________________
> Magritte, Pier and Related Tools ...
> https://www.iam.unibe.ch/mailman/listinfo/smallwiki
>