[Pkg] SystemEditor: SystemEditor-mtf.148.mcz

[squeak-dev-noreply at lists.squeakfoundation.org]

A new version of SystemEditor was added to project SystemEditor:
http://www.squeaksource.com/SystemEditor/SystemEditor-mtf.148.mcz

==================== Summary ====================

Name: SystemEditor-mtf.148
Author: mtf
Time: 28 October 2008, 11:30:57 pm
UUID: cada6390-3950-4ad8-9af0-1bdbec36e2b1
Ancestors: SystemEditor-mtf.146

fixed a potential bug where a class organization may not get rebuilt. Did a little code reformatting in the process

=============== Diff against SystemEditor-mtf.146 ===============

Item was added:
+ ----- Method: PureBehaviorEditor>>edInvalidateOrganization (in category 'building') -----
+ edInvalidateOrganization
+ "Mark my organization as requiring a rebuild, by setting it non-nil"
+ 	self organization!

Item was changed:
  ----- Method: MethodDictionaryEditor>>remove: (in category 'editing') -----
+ remove: aSymbol
+ 	classEditor edInvalidateOrganization.
- remove: aSymbol 
  	additions removeKey: aSymbol ifAbsent: [].
  	removals add: aSymbol!

Item was changed:
  ----- Method: MethodDictionaryEditor>>edPrepareMigration:for: (in category 'building') -----
  edPrepareMigration: txn for: aClassEditor
+ 	txn addMigrator: (ObjectMigrator
+ 		origin: self subject
+ 		destination: (self buildFor: aClassEditor))!
- 	txn addMigrator: (ObjectMigrator 
- 						origin: self subject 
- 						destination: (self buildFor: aClassEditor)).
- 	(additions isEmpty and: [removals isEmpty]) ifFalse: [aClassEditor organization].!

Item was changed:
  ----- Method: MethodDictionaryEditor>>add: (in category 'editing') -----
+ add: aModifiedMethod
+ 	classEditor edInvalidateOrganization.
- add: aModifiedMethod 
  	^ additions at: aModifiedMethod selector put: aModifiedMethod!

Item was changed:
  ----- Method: PureBehaviorEditor>>edPrepareMigration: (in category 'building') -----
  edPrepareMigration: txn
  	self subject ifNil: [^ self].
+ 	self decoratorsDo: [:ea | ea edPrepareMigration: txn].
  	methods ifNotNil: [methods edPrepareMigration: txn for: self].
  	organization ifNotNil: [organization edPrepareMigration: txn].
+ !
- 	self decoratorsDo: [:ea | ea edPrepareMigration: txn]!