'From Cuis 1.0 of 16 July 2009 [latest update: #228] on 27 July 2009 at 11:27:05 am'!
!classDefinition: #TextStyle category: #'Graphics-Text'!
Object subclass: #TextStyle
	instanceVariableNames: 'fontArray lineGrid baseline alignment firstIndent restIndent rightIndent tabsArray marginTabsArray leading defaultFontIndex '
	classVariableNames: 'AXXvailableTextStyles DXXefaultTextStyle '
	poolDictionaries: 'TextConstants'
	category: 'Graphics-Text'!

!TextStyle class methodsFor: 'class initialization' stamp: 'jmv 7/27/2009 11:26'!
temporaryInitialize
	AXXvailableTextStyles _ Dictionary new.
	DXXefaultTextStyle _ self default! !

!classDefinition: #TextStyle category: #'Graphics-Text'!
Object subclass: #TextStyle
	instanceVariableNames: 'fontArray lineGrid baseline alignment firstIndent restIndent rightIndent tabsArray marginTabsArray leading defaultFontIndex'
	classVariableNames: 'AXXvailableTextStyles DXXefaultTextStyle'
	poolDictionaries: 'TextConstants'
	category: 'Graphics-Text'!
"Postscript:
Leave the line above, and replace the rest of this comment by a useful one.
Executable statements should follow this comment, and should
be separated by periods, with no exclamation points (!!).
Be sure to put any further comments in double-quotes, like this one."
TextStyle temporaryInitialize!

