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

commits at source.squeak.org commits at source.squeak.org
Wed Nov 11 17:33:41 UTC 2020

A new version of Morphic was added to project The Inbox:

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

Name: Morphic-ct.1714
Author: ct
Time: 11 November 2020, 6:33:33.254952 pm
UUID: ffa0dcf6-075e-f04b-876f-fdee1186c309
Ancestors: Morphic-mt.1710

Honor hi-dpi settings for halo, window, and keyboard-focus indication borders.

Argh, this makes all these methods harder to read ... Did I patch the methods at the right abstraction level? Please review!

=============== Diff against Morphic-mt.1710 ===============

Item was changed:
  ----- Method: Morph>>keyboardFocusWidth (in category 'drawing') -----
+ 	^ ((self userInterfaceTheme keyboardFocusWidth ifNil: [3]) * RealEstateAgent scaleFactor) rounded!
- 	^ self userInterfaceTheme keyboardFocusWidth ifNil: [3]!

Item was changed:
  ----- Method: SimpleHaloMorph>>drawOn: (in category 'drawing') -----
  drawOn: aCanvas 
  	"Draw this morph only if it has no target."
  	(Preferences showBoundsInHalo and: [self target isWorldMorph not])
  		ifTrue: [
  				frameAndFillRectangle: self bounds
  				fillColor: Color transparent
+ 				borderWidth: (2 * RealEstateAgent scaleFactor) rounded
- 				borderWidth: 2
  				borderColor: (self userInterfaceTheme borderColor ifNil: [Color blue alpha: 0.8])]!

Item was changed:
  ----- Method: SystemWindow>>setDefaultParameters (in category 'initialization') -----
  	Preferences menuAppearance3d
  		ifFalse: [self hasDropShadow: false]
  		ifTrue: [
  			self addDropShadow.
  			self hasDropShadow: self isKeyWindow. "maybe turn off again"].
+ 	self borderWidth: ((self userInterfaceTheme borderWidth ifNil: [1]) * RealEstateAgent scaleFactor) rounded.
- 	self borderWidth: (self userInterfaceTheme borderWidth ifNil: [1]).
  	label font: (self userInterfaceTheme titleFont ifNil: [TextStyle defaultFont]).!

More information about the Squeak-dev mailing list