[Seaside] Wafer weblog sample application

[tblanchard at mac.com]

Yeah, the glorp is simpler.  Bear in mind that the data model for this 
thing is dead simple - two kinds of records - user and story.  Stories 
are trees (each has a parent story unless its a top level story).

I overrode isolate: in session to do:

glorpSession beginUnitOfWork.
super isolate: aBlock.
glorpSession commitUnitOfWork.

And the ubiquitous home button is just:

glorpSession rollbackUnitOfWork.
home clearDelegate.

Seems to work fine - otherwise there's a couple queries - ie

login

        | user |
        user := self session glorpSession readOneOf: WaferUser where: 
[:u | (u username = username) & (u password = password)].
        user ifNotNil: [self answer: user] ifNil [self errorMessage: 
'Login invalid']

The SmartFileDictionary took some tickling in odd places to convince it 
that it needed writing and occasionally it would give me old data - it 
makes too many copies I think.

On Saturday, August 16, 2003, at 11:19  AM, Avi Bryant wrote:

>
> On Sat, 16 Aug 2003 tblanchard at mac.com wrote:
>
>> I demo'd this last night and completely blew the attendees (about a
>> dozen) away.
>
> Awesome.
>
>> I reckon I spent about 6 hours on the presentation bit (and probably 5
>> times that playing with various persistence mechanisms - the one I
>> demo'd used GLORP on PGSQL - the one I posted used SmartFileDictionary
>> - the GLORP one is simpler).
>
> The GLORP one is *simpler*?  That's fascinating.  Care to talk a bit 
> about
> your experiences with GLORP?  I haven't had a chance to use it yet.
>
> Avi
>
> _______________________________________________
> Seaside mailing list
> Seaside at lists.squeakfoundation.org
> http://lists.squeakfoundation.org/listinfo/seaside
>