'From Cuis 1.0 of 4 September 2009 [latest update: #290] on 8 September 2009 at 5:36:55 pm'!
!classDefinition: #AlignmentMorph category: #'Morphic-Basic'!
BorderedMorph subclass: #AlignmentMorph
	instanceVariableNames: ''
	classVariableNames: ''
	poolDictionaries: ''
	category: 'Morphic-Basic'!
!classDefinition: #ProgressMorph category: #'Morphic-Widgets'!
BorderedMorph subclass: #ProgressMorph
	instanceVariableNames: 'labelMorph subLabelMorph progress '
	classVariableNames: ''
	poolDictionaries: ''
	category: 'Morphic-Widgets'!

!RectangleMorph commentStamp: '<historical>' prior: 0!
A subclass of BorderedMorph.!

!classDefinition: #ScrollbarButton category: #'Morphic-Windows'!
BorderedMorph subclass: #ScrollbarButton
	instanceVariableNames: 'image '
	classVariableNames: 'Arrows Box CurrentSize '
	poolDictionaries: ''
	category: 'Morphic-Windows'!
!classDefinition: #SimpleButtonMorph category: #'Morphic-Widgets'!
BorderedMorph subclass: #SimpleButtonMorph
	instanceVariableNames: 'target actionSelector arguments actWhen oldColor label font '
	classVariableNames: ''
	poolDictionaries: ''
	category: 'Morphic-Widgets'!
!classDefinition: #TextMorph category: #'Morphic-Text Support'!
BorderedMorph subclass: #TextMorph
	instanceVariableNames: 'text wrapFlag paragraph editor container backgroundColor margins '
	classVariableNames: ''
	poolDictionaries: ''
	category: 'Morphic-Text Support'!
!classDefinition: #TextMorph category: #'Morphic-Text Support'!
BorderedMorph subclass: #TextMorph
	instanceVariableNames: 'text wrapFlag paragraph editor container backgroundColor margins'
	classVariableNames: ''
	poolDictionaries: ''
	category: 'Morphic-Text Support'!
!classDefinition: #SimpleButtonMorph category: #'Morphic-Widgets'!
BorderedMorph subclass: #SimpleButtonMorph
	instanceVariableNames: 'target actionSelector arguments actWhen oldColor label font'
	classVariableNames: ''
	poolDictionaries: ''
	category: 'Morphic-Widgets'!
!classDefinition: #ScrollbarButton category: #'Morphic-Windows'!
BorderedMorph subclass: #ScrollbarButton
	instanceVariableNames: 'image'
	classVariableNames: 'Arrows Box CurrentSize'
	poolDictionaries: ''
	category: 'Morphic-Windows'!
!classDefinition: #ProgressMorph category: #'Morphic-Widgets'!
BorderedMorph subclass: #ProgressMorph
	instanceVariableNames: 'labelMorph subLabelMorph progress'
	classVariableNames: ''
	poolDictionaries: ''
	category: 'Morphic-Widgets'!
