[Pkg] SystemEditor: TraitEditor-mtf.7.mcz
squeak-dev-noreply at lists.squeakfoundation.org
squeak-dev-noreply at lists.squeakfoundation.org
Tue Oct 14 03:11:31 UTC 2008
A new version of TraitEditor was added to project SystemEditor:
http://www.squeaksource.com/SystemEditor/TraitEditor-mtf.7.mcz
==================== Summary ====================
Name: TraitEditor-mtf.7
Author: mtf
Time: 13 October 2008, 12:00 am
UUID: 020bea91-e709-4915-88c4-4ee93284234d
Ancestors: TraitEditor-mtf.6
Started filling out TraitEditor, and created PureBehaviorEditor
=============== Diff against TraitEditor-mtf.6 ===============
Item was added:
+ ----- Method: TraitEditor>>name (in category 'accessing') -----
+ name
+ ^ name!
Item was changed:
TraitDescriptionEditor subclass: #TraitEditor
+ instanceVariableNames: 'name classTrait category'
- instanceVariableNames: 'classTrait category'
classVariableNames: ''
poolDictionaries: ''
category: 'TraitEditor'!
Item was added:
+ ----- Method: PureBehaviorEditor>>hasTraitComposition (in category '*TraitEditor') -----
+ hasTraitComposition
+ ^ self traitComposition notNil!
Item was added:
+ ----- Method: PureBehaviorEditor>>traitComposition: (in category '*TraitEditor') -----
+ traitComposition: aTraitCompositionOrCollection
+ self propertyAt: #traitComposition put: aTraitCompositionOrCollection!
Item was changed:
----- Method: ClassEditor>>subclass:uses:instanceVariableNames:classVariableNames:poolDictionaries:category: (in category '*TraitEditor') -----
subclass: aSymbol uses: traitComposition instanceVariableNames: instString classVariableNames: classString poolDictionaries: poolString category: categoryString
^ self subclass: aSymbol
instanceVariableNames: instString
classVariableNames: classString
poolDictionaries: poolString
category: categoryString;
traitComposition: traitComposition;
yourself
!
Item was added:
+ ----- Method: PureBehaviorEditor>>traitComposition (in category '*TraitEditor') -----
+ traitComposition
+ ^ self propertyAt: #traitComposition ifAbsent: [nil]!
Item was changed:
+ PureBehaviorEditor subclass: #TraitDescriptionEditor
+ instanceVariableNames: ''
- AbstractEditor subclass: #TraitDescriptionEditor
- instanceVariableNames: 'subject product system methods organization'
classVariableNames: ''
poolDictionaries: ''
category: 'TraitEditor'!
!TraitDescriptionEditor commentStamp: 'mtf 6/20/2008 22:21' prior: 0!
A base class for both TraitEditor and ClassTraitEditor!
Item was added:
+ ----- Method: TraitEditor>>setSubject:system: (in category 'initialization') -----
+ setSubject: aClass system: aSystemEditor
+ subject := aClass.
+ system := aSystemEditor.
+ subject ifNil:
+ [name := #Annonymous.
+ methods := MethodDictionaryEditor for: self].
+ decorators := ClassDecorator decoratorsFor: self.!
Item was added:
+ ----- Method: TraitEditor>>setName: (in category 'initialization') -----
+ setName: aSymbol
+ name := aSymbol!
Item was added:
+ ----- Method: TraitEditor>>on:for: (in category 'initialization') -----
+ on: aClass for: aSystemEditor
+ ^ self setSubject: aClass system: aSystemEditor!
Item was added:
+ ----- Method: TraitEditor>>category: (in category 'reflecting') -----
+ category: aSymbol
+ category := aSymbol!
Item was removed:
- ----- Method: ClassEditor>>hasTraitComposition (in category '*TraitEditor') -----
- hasTraitComposition
- ^ self traitComposition notNil!
Item was removed:
- ----- Method: ClassEditor>>traitComposition (in category '*TraitEditor') -----
- traitComposition
- ^ self propertyAt: #traitComposition ifAbsent: [nil]!
More information about the Packages
mailing list