[squeak-dev] The Trunk: Morphic-mt.1589.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Nov 20 13:45:45 UTC 2019


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!



More information about the Squeak-dev mailing list