[squeak-dev] The Trunk: Morphic-ar.161.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Aug 26 03:50:32 UTC 2009


Andreas Raab uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-ar.161.mcz

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

Name: Morphic-ar.161
Author: ar
Time: 25 August 2009, 8:49:08 am
UUID: c668bbf1-411e-4c46-ac88-b7f7244d8275
Ancestors: Morphic-laza.160

Integrate Polymorph fix for BorderedMorph>>areasRemainingToFill:.

=============== Diff against Morphic-laza.160 ===============

Item was changed:
  ----- Method: BorderedMorph>>areasRemainingToFill: (in category 'drawing') -----
+ areasRemainingToFill: aRectangle
+ 	"Fixed here to test the fillStyle rather than color for translucency.
+ 	Since can have a translucent fillStyle while the (calculated) color is not."
+ 	
+ 	self fillStyle isTranslucent
- areasRemainingToFill: aRectangle 
- 	(color isColor
- 			and: [color isTranslucent])
  		ifTrue: [^ Array with: aRectangle].
  	self wantsRoundedCorners
  		ifTrue: [(self borderWidth > 0
  					and: [self borderColor isColor
  							and: [self borderColor isTranslucent]])
  				ifTrue: [^ aRectangle
  						areasOutside: (self innerBounds intersect: self boundsWithinCorners)]
  				ifFalse: [^ aRectangle areasOutside: self boundsWithinCorners]]
  		ifFalse: [(self borderWidth > 0
  					and: [self borderColor isColor
  							and: [self borderColor isTranslucent]])
  				ifTrue: [^ aRectangle areasOutside: self innerBounds]
+ 				ifFalse: [^ aRectangle areasOutside: self bounds]]
+ !
- 				ifFalse: [^ aRectangle areasOutside: self bounds]]!




More information about the Squeak-dev mailing list