[Seaside] Seaside Testing -

[C. David Shaffer]

C. David Shaffer wrote:

>
>
> self newApplicationWithRootClass: SomeComponent initializeWith: [:comp 
> | "do something to comp"].
>
> How does that sound?  If it will work for you I'll try to get it working.
>
> David
>
In fact, I just went ahead and published it.  It seems to work fine.  
Here is an example from WACounterTest:

testPreBuilt
    self newApplicationWithRootClass: WACounter initializeWith: [:comp | 
comp increase; increase].
    self establishSession.
    self assert: self component count = 2

David

-- 
C. David Shaffer
http://www.cs.westminster.edu/~shaffer
http://www.shaffer-consulting.com