The Trunk: Morphic-kfr.1509.mcz

Karl Ramberg uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-kfr.1509.mcz

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

Name: Morphic-kfr.1509
Author: kfr
Time: 22 August 2019, 6:46:21.434151 pm
UUID: 8468fa35-928c-3849-8ee1-f86a3c72527a
Ancestors: Morphic-mt.1508

#removeModalWindow is deprecated, but many old projects still references to it. Remove reference upon loading project.

=============== Diff against Morphic-mt.1508 ===============

Item was changed:
  ----- Method: PasteUpMorph>>fixUponLoad:seg: (in category 'objects from disk') -----
+ fixUponLoad: aProject seg: anImageSegment
- fixUponLoad: aProject seg: anImageSegment
  "We are in an old project that is being loaded from disk.
+ Fix up conventions that have changed."
+ | weakMessage |
+ self isWorldMorph
+ ifTrue: [(self valueOfProperty: #soundAdditions)
+ ifNotNil: [:additions | SampledSound assimilateSoundsFrom: additions]].
+ self actionMap
+ ifNotNil: [:aDictionary |
+ weakMessage := aDictionary
+ at: #aboutToLeaveWorld
+ ifAbsent: [].
+ weakMessage
+ ifNotNil: [weakMessage selector = #removeModalWindow
+ ifTrue: [weakMessage receiver: nil]]].
- Fix up conventions that have changed."
-
- self isWorldMorph ifTrue: [
- (self valueOfProperty: #soundAdditions) ifNotNil:
- [:additions | SampledSound
- assimilateSoundsFrom: additions]].
-
  ^ super fixUponLoad: aProject seg: anImageSegment!