[Seaside] Re: [ANN] New Reef page and Tutorial available

[recursive68 at gmail.com]

Hi,

I'm deploying like this:

REApplication
registerAsApplication: 'simpleTutorial'
root: RTWebApplication

and these are the classes:

REForm subclass: #RTSearchPart
instanceVariableNames: ''
classVariableNames: ''
poolDictionaries: ''
category: 'ReefTutorial-View'

REForm>>initializeContents
self add: 'Search:'.
self add: RETextField new.


WAComponent subclass: #RTWebApplication
instanceVariableNames: 'searchComponent'
classVariableNames: ''
poolDictionaries: ''
category: 'ReefTutorial-View'

RTWebApplication>>initialize
super initialize.
searchComponent := RTSearchPart new asComponent.

RTWebApplication>>renderContentOn: html
html render: searchComponent.

RTWebApplication>>children
^Array with: searchComponent


Thanks.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.squeakfoundation.org/pipermail/seaside/attachments/20101019/c8b74c6b/attachment.htm