Halos, styles, and components

I've been playing with adding tweaks to smallblog and one of the little 
things I've run across is that any changes to a blog's style affect all 
blogs because style is stored as a method on the WAComponent.  While 
this is a great strategy for a website, its not so hot for multiple 
blogs that hope to have different themes.
So...

I've made a little change in WAViewer changing

renderCssOn: html
        html attributes rows: 20; cols: 80.
        html textAreaWithValue: presenter style callback:
                [:css |
                presenter class compile: 'style ^ ', css printString]

to

renderCssOn: html
        html attributes rows: 20; cols: 80.
        html textAreaWithValue: presenter style callback:
                [:css | presenter style: css ]

and adding a style: method to WAPresenter that does

style: aString
    self class compile: 'style ^', aString printString

This lets me override the style methods on SLFrame and delegate the 
keeping of the css to the SLBlog object itself.