Marcel Taeumel uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-mt.1589.mcz==================== Summary ====================
Name: Morphic-mt.1589
Author: mt
Time: 20 November 2019, 2:45:39.406662 pm
UUID: 5accb57c-4211-b54c-855d-2702370cee12
Ancestors: Morphic-mt.1588
Removes some missed deprecation sends.
=============== Diff against Morphic-mt.1588 ===============
Item was changed:
----- Method: ProjectViewMorph>>enter (in category 'events') -----
enter
"Enter my project."
self world == self outermostWorldMorph ifFalse: [^Beeper beep]. "can't do this at the moment"
project class == DiskProxy
ifFalse:
[(project world notNil and:
[project world isMorph
and: [project world hasOwner: self outermostWorldMorph]])
ifTrue: [^Beeper beep "project is open in a window already"]].
project class == DiskProxy
ifTrue:
["When target is not in yet"
self enterWhenNotPresent. "will bring it in"
project class == DiskProxy ifTrue: [^self inform: 'Project not found' translated]].
+ (owner isSystemWindow) ifTrue: [project viewSize: self extent].
- (owner isSystemWindow) ifTrue: [project setViewSize: self extent].
self showMouseState: 3.
project
enter: false
revert: false
saveForRevert: false!
Item was changed:
----- Method: ProjectViewMorph>>enterAsActiveSubproject (in category 'events') -----
enterAsActiveSubproject
"Enter my project."
project class == DiskProxy
ifTrue:
["When target is not in yet"
[self enterWhenNotPresent "will bring it in"] on: ProjectEntryNotification
do: [:ex | ^ex projectToEnter enterAsActiveSubprojectWithin: self world].
project class == DiskProxy ifTrue: [self error: 'Could not find view']].
+ (owner isSystemWindow) ifTrue: [project viewSize: self extent].
- (owner isSystemWindow) ifTrue: [project setViewSize: self extent].
self showMouseState: 3.
project enterAsActiveSubprojectWithin: self world!
Locked
