WACanvas

Seaside-Canvas

Comment: 






Hierarchy:




ProtoObject

Object

WACanvas














Summary:






instance variables:








currentBrush

parentBrush











methods:








instance
class


as yet unclassified


no messages

    







Detail:






instance variables:








currentBrush








inferredType:
UndefinedObject










parentBrush








inferredType:
UndefinedObject












instance methods:








as yet unclassified




brush: aBrush







	self flush.
	currentBrush _ aBrush.
	aBrush setParent: parentBrush canvas: self.
	^ aBrush






flush







	currentBrush ifNotNil:
		[currentBrush close.
		currentBrush _ nil]






nest: aBlock







	parentBrush _ currentBrush.
	currentBrush _ nil.
	aBlock renderOn: self.
	self flush.
	parentBrush _ parentBrush parent.













class methods:







^top






- made by Dandelion -