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

commits at source.squeak.org commits at source.squeak.org
Wed Mar 8 09:14:10 UTC 2023


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

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

Name: Morphic-mt.2095
Author: mt
Time: 8 March 2023, 10:14:08.422447 am
UUID: 00cdaa33-4727-5a43-9236-b1dd3379ea34
Ancestors: Morphic-mt.2094

Fix minor EToys dependency in splitters.

=============== Diff against Morphic-mt.2094 ===============

Item was changed:
  ----- Method: ProportionalSplitterMorph>>splitterLeft (in category 'queries - adjacent splitters') -----
  splitterLeft
  	| immediateLeft |
  	immediateLeft := nil.
  	self siblingSplittersDo:
+ 		[ : each | each left < self left ifTrue:
- 		[ : each | each x < self x ifTrue:
  			[ immediateLeft
  				ifNil: [ immediateLeft := each ]
  				ifNotNil:
+ 					[ each left > immediateLeft left ifTrue: [ immediateLeft := each ] ] ] ].
- 					[ each x > immediateLeft x ifTrue: [ immediateLeft := each ] ] ] ].
  	^ immediateLeft!

Item was changed:
  ----- Method: ProportionalSplitterMorph>>splitterRight (in category 'queries - adjacent splitters') -----
  splitterRight
  	| immediateRight |
  	immediateRight := nil.
  	self siblingSplittersDo:
+ 		[ : each | each left > self left ifTrue:
- 		[ : each | each x > self x ifTrue:
  			[ immediateRight
  				ifNil: [ immediateRight := each ]
  				ifNotNil:
+ 					[ each left < immediateRight left ifTrue: [ immediateRight := each ] ] ] ].
- 					[ each x < immediateRight x ifTrue: [ immediateRight := each ] ] ] ].
  	^ immediateRight!



More information about the Squeak-dev mailing list