Alexander Lazarević uploaded a new version of MorphicExtras to project The Trunk:
http://source.squeak.org/trunk/MorphicExtras-laza.78.mcz==================== Summary ====================
Name: MorphicExtras-laza.78
Author: laza
Time: 9 March 2010, 5:06:22.254 pm
UUID: 53fcbaf0-b526-494e-b91a-89bf89d0a148
Ancestors: MorphicExtras-ar.77
Fix for
http://bugs.squeak.org/view.php?id=7438=============== Diff against MorphicExtras-ar.77 ===============
Item was changed:
----- Method: AlignmentMorphBob1>>wantsDroppedMorph:event: (in category 'as yet unclassified') -----
wantsDroppedMorph: aMorph event: evt
| handlerForDrops |
handlerForDrops := self valueOfProperty: #handlerForDrops ifAbsent: [
^super wantsDroppedMorph: aMorph event: evt
].
+ ^handlerForDrops wantsDroppedMorph: aMorph event: evt inMorph: self!
- ^handlerForDrops wantsDroppedMorph: aMorph event: evt in: self!
Item was changed:
----- Method: AlignmentMorphBob1>>acceptDroppingMorph:event: (in category 'as yet unclassified') -----
acceptDroppingMorph: aMorph event: evt
| handlerForDrops |
handlerForDrops := self valueOfProperty: #handlerForDrops ifAbsent: [
^super acceptDroppingMorph: aMorph event: evt
].
+ (handlerForDrops acceptDroppingMorph: aMorph event: evt inMorph: self) ifFalse: [
- (handlerForDrops acceptDroppingMorph: aMorph event: evt in: self) ifFalse: [
aMorph rejectDropMorphEvent: evt. "send it back where it came from"
].!
Item was changed:
SystemOrganization addCategory: #'MorphicExtras-Demo'!
SystemOrganization addCategory: #'MorphicExtras-AdditionalSupport'!
SystemOrganization addCategory: #'MorphicExtras-AdditionalMorphs'!
SystemOrganization addCategory: #'MorphicExtras-Widgets'!
SystemOrganization addCategory: #'MorphicExtras-Books'!
SystemOrganization addCategory: #'MorphicExtras-Postscript Filters'!
SystemOrganization addCategory: #'MorphicExtras-Support'!
SystemOrganization addCategory: #'MorphicExtras-SoundInterface'!
SystemOrganization addCategory: #'MorphicExtras-Undo'!
- SystemOrganization addCategory: #'MorphicExtras-Components'!
SystemOrganization addCategory: #'MorphicExtras-Postscript Canvases'!
SystemOrganization addCategory: #'MorphicExtras-PartsBin'!
SystemOrganization addCategory: #'MorphicExtras-AdditionalWidgets'!
SystemOrganization addCategory: #'MorphicExtras-Flaps'!
SystemOrganization addCategory: #'MorphicExtras-Navigators'!
SystemOrganization addCategory: #'MorphicExtras-GeeMail'!
SystemOrganization addCategory: #'MorphicExtras-Palettes'!
SystemOrganization addCategory: #'MorphicExtras-Leds'!
SystemOrganization addCategory: #'MorphicExtras-SqueakPage'!
SystemOrganization addCategory: #'MorphicExtras-Text Support'!
SystemOrganization addCategory: #'MorphicExtras-Obsolete'!
SystemOrganization addCategory: #'MorphicExtras-EToy-Download'!