WARenderLoopContinuation>>updateRoot "HTML-only"

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
2 messages Options
Reply | Threaded
Open this post in threaded view
|

WARenderLoopContinuation>>updateRoot "HTML-only"

rshiple

WARenderLoopContinuation

>>updateRoot: anHtmlRoot
anHtmlRoot bodyAttributes at: 'onload' append: 'onLoad()' separator: ';'.
anHtmlRoot meta contentType: self application contentType.
anHtmlRoot meta contentScriptType: WAMimeType textJavascript.
anHtmlRoot htmlAttributes
at: 'xmlns' put: 'http://www.w3.org/1999/xhtml';
at: 'xml:lang' put: 'en';
at: 'lang' put: 'en'.
anHtmlRoot beXhtml10Strict.
anHtmlRoot title: 'Seaside'.
self application libraries
do: [ :each | each default updateRoot: anHtmlRoot ].
self session updateRoot: anHtmlRoot


_______________________________________________
seaside mailing list
[hidden email]
http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside
Reply | Threaded
Open this post in threaded view
|

Re: WARenderLoopContinuation>>updateRoot "HTML-only"

Philippe Marschall
2009/9/12 Robert Shiplett <[hidden email]>

>
> WARenderLoopContinuation
>
> >>updateRoot: anHtmlRoot
> anHtmlRoot bodyAttributes at: 'onload' append: 'onLoad()' separator: ';'.
> anHtmlRoot meta contentType: self application contentType.
> anHtmlRoot meta contentScriptType: WAMimeType textJavascript.
> anHtmlRoot htmlAttributes
> at: 'xmlns' put: 'http://www.w3.org/1999/xhtml';
> at: 'xml:lang' put: 'en';
> at: 'lang' put: 'en'.
> anHtmlRoot beXhtml10Strict.
> anHtmlRoot title: 'Seaside'.
> self application libraries
> do: [ :each | each default updateRoot: anHtmlRoot ].
> self session updateRoot: anHtmlRoot

Make a subclass, is configurable on WAApplication.

Cheers
Philippe
_______________________________________________
seaside mailing list
[hidden email]
http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside