WAViewer

Seaside-Components-Tools

Comment: 






Hierarchy:




ProtoObject

Object

WAPresenter


WAComponent


WAFormDialog


WALabelledFormDialog


WAViewer

















Summary:






instance variables:








presenter











methods:








instance
class


as yet unclassified


as yet unclassified






Detail:






instance variables:








presenter











instance methods:








as yet unclassified




buttons







	^ #(save)






model







	^ presenter






presenter: aPresenter







	presenter _ aPresenter






renderContentOn: html







	html heading: presenter asString level: 3.
	super renderContentOn: html






renderCssOn: html







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






rows







	^ #(css)






save







	






script







	^ 'self.opener.location=self.opener.location'












class methods:








as yet unclassified




on: aPresenter







	^ self new presenter: aPresenter











^top






- made by Dandelion -