The Trunk: PreferenceBrowser-mt.111.mcz

Previous Topic Next Topic
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view

The Trunk: PreferenceBrowser-mt.111.mcz

Marcel Taeumel uploaded a new version of PreferenceBrowser to project The Trunk:

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

Name: PreferenceBrowser-mt.111
Author: mt
Time: 20 February 2021, 12:51:39.041759 pm
UUID: d1a8f578-f8f1-8747-b08a-43b49361fef2
Ancestors: PreferenceBrowser-mt.110

Complements Morphic-mt.1724

=============== Diff against PreferenceBrowser-mt.110 ===============

Item was changed:
  ----- Method: PreferenceBrowserMorph>>initializeWithModel: (in category 'initialization') -----
  initializeWithModel: aPreferenceBrowser
  lastKeystrokeTime := 0.
  lastKeystrokes := ''.
+ self
+ hResizing: #spaceFill; "Snap #extent to grid if enabled. See #worldGridEnabled."
+ vResizing: #spaceFill; "Snap #extent to grid if enabled. See #worldGridEnabled."
- self
  model: aPreferenceBrowser;
  setLabel: self model windowTitle;
  name: 'PreferenceBrowser';
  addMorph: self rootPanel fullFrame: self rootPanelLayoutFrame;
  addMorph: self newButtonRow fullFrame: self buttonRowLayoutFrame.!

Item was changed:
  ----- Method: PreferenceWizardMorph>>initialize (in category 'initialization') -----
  super initialize.
  isFullScreen := false.
  self hasLowPerformance
  ifTrue: [self color: self defaultColor]
  ifFalse: [self color: (self defaultColor alpha: 0.75)].
  self setProperty: #indicateKeyboardFocus toValue: #never.
  layoutInset: 20;
  cellGap: 10;
+ cellPositioning: #center;
+ disableLayout: true.
- cellPositioning: #center.
  self addKeyboardCaptureFilter: self.!