[squeak-dev] The Trunk: Morphic-dtl.609.mcz
commits at source.squeak.org
commits at source.squeak.org
Sat Feb 11 17:08:48 UTC 2012
David T. Lewis uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-dtl.609.mcz
==================== Summary ====================
Name: Morphic-dtl.609
Author: dtl
Time: 11 February 2012, 12:07:02.836 pm
UUID: 7e071de6-1409-44f1-aedb-e3f18075810d
Ancestors: Morphic-cmm.608
Make Connectors removable (almost).
Morph>>connections and Morph>>wantsEmbeddingsVocabulary are provided by package Connectors. Remove the stub implementations from Morphic and update Morph>>wantsConnectionVocabulary and Morph>>filterViewerCategoryDictionary: in package Etoys with #respondsTo: checks to break the package dependencies.
Allow Morph>>dismissMorph override to be removed from Connectors by adding the functionality to package Morphic, guarded by #respondsTo:
Follow up needed in Connectors:
Remove Morph>>dismissMorph override
Remove PasteUpMorph>>tellAllContents: override
Remove ObjectPropertiesMorph>>rebuild override
=============== Diff against Morphic-cmm.608 ===============
Item was removed:
- ----- Method: Morph>>connections (in category 'accessing') -----
- connections
- "Empty method in absence of connectors"
- ^ #()!
Item was changed:
----- Method: Morph>>dismissMorph (in category 'meta-actions') -----
dismissMorph
+ "This is called from an explicit halo destroy/delete action.
+ So first disconnect all constraints to keep the graph up to date."
- "This is called from an explicit halo destroy/delete action."
+ (self respondsTo: #disconnectAllConstraints) "Connectors package"
+ ifTrue: [ self perform: #disconnectAllConstraints ].
+ (self respondsTo: #releaseGraphModels) "CGPrereqs package (Connectors)"
+ ifTrue: [ self perform: #releaseGraphModels ].
+ self releaseGraphModels.
+ self world ifNotNilDo:
+ [:w | w abandonAllHalos; stopStepping: self].
- | w |
- w := self world ifNil:[^self].
- w abandonAllHalos; stopStepping: self.
self delete!
Item was removed:
- ----- Method: Morph>>wantsEmbeddingsVocabulary (in category 'accessing') -----
- wantsEmbeddingsVocabulary
- "Empty method in absence of connectors"
- ^ false!
More information about the Squeak-dev
mailing list
|