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

commits at source.squeak.org commits at source.squeak.org
Fri Jan 20 17:48:54 UTC 2023


Marcel Taeumel uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-mt.2070.mcz

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

Name: Morphic-mt.2070
Author: mt
Time: 20 January 2023, 6:48:51.837382 pm
UUID: 698147f2-5aa9-2c41-b96e-a21f8163a07d
Ancestors: Morphic-mt.2069

Complements System-mt.1385

=============== Diff against Morphic-mt.2069 ===============

Item was changed:
  ----- Method: SystemWindow>>delete (in category 'open/close') -----
  delete
  	| thisWorld sketchEditor aPaintBox |
  	self mustNotClose ifTrue: [^self].
  	model okToClose ifFalse: [^self].
  	thisWorld := self world.
  	sketchEditor := self extantSketchEditor.
  	
  	self activeHand removeKeyboardListener: self.
+ 	RealEstateAgent rememberExtentFor: model.
  	
  	self isFlexed
  		ifTrue: [owner delete]
  		ifFalse: [super delete].
  	model windowIsClosing; release.
  	model := nil.
  	sketchEditor ifNotNil:
  		[sketchEditor deleteSelfAndSubordinates.
  		 (thisWorld notNil 
  		  and: [(aPaintBox := thisWorld paintBoxOrNil) notNil]) ifTrue:
  			[aPaintBox delete]].
  		
  	SystemWindow noteTopWindowIn: thisWorld!



More information about the Squeak-dev mailing list