[Pkg] SystemEditor: SystemEditorBrowser-mtf.8.mcz

[squeaksource-noreply at iam.unibe.ch]

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

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

Name: SystemEditorBrowser-mtf.8
Author: mtf
Time: 20 June 2008, 9:41:14 am
UUID: 8c8cca86-775a-4a2a-8ab5-6034000f303a
Ancestors: SystemEditorBrowser-mtf.7

moved properties down into ClassEditor

=============== Diff against SystemEditorBrowser-mtf.7 ===============

Item was changed:
  ClassEditor subclass: #ClassEditorUIModel
+ 	instanceVariableNames: ''
- 	instanceVariableNames: 'properties'
  	classVariableNames: ''
  	poolDictionaries: ''
  	category: 'SystemEditorBrowser'!

Item was removed:
- ----- Method: ClassEditorUIModel>>propertyAt:ifAbsent: (in category 'accessing properties') -----
- propertyAt: key ifAbsent: aBlock
- 
- 	^ properties
- 		ifNil: aBlock
- 		ifNotNil: [properties at: key ifAbsent: aBlock]!

Item was removed:
- ----- Method: ClassEditorUIModel>>propertyAt:put: (in category 'accessing properties') -----
- propertyAt: aSymbol put: value
- 
- 	properties ifNil: [properties := Dictionary new].
- 	^ properties at: aSymbol put: value!

Item was removed:
- ----- Method: ClassEditorUIModel>>propertyAt: (in category 'accessing properties') -----
- propertyAt: key
- 
- 	^self propertyAt: key ifAbsent: [nil]!

Item was removed:
- ----- Method: ClassEditorUIModel>>propertyAt:ifAbsentPut: (in category 'accessing properties') -----
- propertyAt: key ifAbsentPut: aBlock
- 
- 	^ self propertyAt: key ifAbsent: [
- 		self propertyAt: key put: aBlock value]!