[Seaside] Possible bug in WAAdmin register: aRequestHandlerClass at: aString in: aDispatcher

Julian Fitzell jfitzell at gmail.com
Fri Aug 27 09:31:39 UTC 2010


The ',' is correct by ANSI and also tested for in Grease...

 ----- Method: GRStringTest>>testSubStrings (in category 'tests') -----
 testSubStrings
       "#subStrings: is defined by ANSI 5.7.10.15:
       Answer an array containing the substrings in the receiver
separated by the elements of separators."
       | mimeType tokens |
       mimeType := 'application/xhtml+xml'.
       tokens := mimeType subStrings: '/'.
       self assert: tokens size = 2.
       self assert: tokens first = 'application'.
       self assert: tokens second = 'xhtml+xml'.

On Fri, Aug 27, 2010 at 9:48 AM, Bart Veenstra <bart.veenstra at gmail.com> wrote:
> I am on vw 77 with the latest seaside 3.0 from the public repos (87 i
> think). I checked the seaside one click image as well, and it also used a
> '/' instead of a /$ for tokenizing a String.
>
>
>
> 2010/8/27 Lukas Renggli <renggli at gmail.com>
>>
>> This is strange. What platform are you on? What version?
>>
>> On Thursday, August 26, 2010, Bart Veenstra <bart.veenstra at gmail.com>
>> wrote:
>> > Hi all,
>> > While registring applications seaside other than root, my applications
>> > where not accessible at their paths. It seemd that the dispatcher was not
>> > tokenzing the path correctly, because the it takes the '/' as argument
>> > instead of the $/ causing the applications to be registered at the whole
>> > path, instead of registering a WADispatcher for the sub paths.
>> >
>> > Don't know of this is the right list for it, but it caused me some
>> > headaches yesterday evening :)
>> > Possible fix:
>> > WAAdmin register: aRequestHandlerClass at: aString in: aDispatcher
>> >       | path dispatcher |     path := aString subStrings: $/. dispatcher
>> > := path allButLast
>> >               inject: aDispatcher             into: [ :result :each |
>> >               result handlers
>> >                               at: each
>> >  ifAbsent: [ result register: WADispatcher new at: each ] ].
>> >       ^ dispatcher register: aRequestHandlerClass new at: path last
>> > Regards,
>> > Bart
>> >
>>
>> --
>> Lukas Renggli
>> www.lukas-renggli.ch
>> _______________________________________________
>> seaside mailing list
>> seaside at lists.squeakfoundation.org
>> http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside
>
>
> _______________________________________________
> seaside mailing list
> seaside at lists.squeakfoundation.org
> http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside
>
>


More information about the seaside mailing list