[squeak-dev] The Inbox: Morphic-ct.1769.mcz

commits at source.squeak.org commits at source.squeak.org
Sat May 1 12:12:22 UTC 2021


A new version of Morphic was added to project The Inbox:
http://source.squeak.org/inbox/Morphic-ct.1769.mcz

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

Name: Morphic-ct.1769
Author: ct
Time: 1 May 2021, 2:12:17.510389 pm
UUID: aa271c07-344a-324a-afe4-3950d6c00839
Ancestors: Morphic-mt.1767

Make SystemWindow's paneColor more robust against missing models. Avoid translucent color.

=============== Diff against Morphic-mt.1767 ===============

Item was changed:
  ----- Method: SystemWindow>>paneColor (in category 'colors') -----
  paneColor
  	| cc |
  	(cc := self valueOfProperty: #paneColor) ifNotNil: [^cc].
  	(model respondsTo: #windowColorToUse) ifTrue: [cc := model windowColorToUse].
+ 	cc ifNil: [cc := paneMorphs
+ 		detect: [:morph | morph color isTransparent not]
+ 		ifFound: [:morph | morph color asNontranslucentColor]
+ 		ifNone: [nil]].
- 	cc ifNil: [cc := paneMorphs isEmptyOrNil ifFalse: [paneMorphs first color]].
  	cc ifNil: [cc := self defaultColor].
  	self paneColor: cc.
  	^cc!



More information about the Squeak-dev mailing list