[squeak-dev] The Trunk: Morphic-laza.421.mcz

commits at source.squeak.org commits at source.squeak.org
Sat Apr 10 08:12:22 UTC 2010

Alexander Lazarević uploaded a new version of Morphic to project The Trunk:

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

Name: Morphic-laza.421
Author: laza
Time: 10 April 2010, 10:11:13.657 am
UUID: bdb40d75-5c3c-ef4b-8af6-5aba1fc537fc
Ancestors: Morphic-ar.420

Prevent FlapTabs to have floats as bounds after a change of the Squeak window. This sometimes made FlapTabs leave "gribbles" on the screen while moving them.

Addressing http://bugs.squeak.org/view.php?id=6536

=============== Diff against Morphic-ar.420 ===============

Item was changed:
  ----- Method: Morph>>position: (in category 'geometry') -----
  position: aPoint 
  	"Change the position of this morph and and all of its
  	submorphs. "
  	| delta box |
+ 	delta := (aPoint - bounds topLeft) rounded.
- 	delta := aPoint asNonFractionalPoint - bounds topLeft.
  	(delta x = 0
  			and: [delta y = 0])
  		ifTrue: [^ self].
  	"Null change"
  	box := self fullBounds.
  	(delta dotProduct: delta)
  			> 100
  		ifTrue: ["e.g., more than 10 pixels moved"
  			self invalidRect: box.
  				invalidRect: (box translateBy: delta)]
  		ifFalse: [self
  				invalidRect: (box
  						merge: (box translateBy: delta))].
  	self privateFullMoveBy: delta.
  		ifNotNil: [owner layoutChanged]!

More information about the Squeak-dev mailing list