Marcel Taeumel uploaded a new version of PreferenceBrowser to project The Trunk: http://source.squeak.org/trunk/PreferenceBrowser-mt.155.mcz
==================== Summary ====================
Name: PreferenceBrowser-mt.155 Author: mt Time: 20 January 2023, 6:49:09.406382 pm UUID: 6e676602-7bfe-f846-922f-7dc9b403571f Ancestors: PreferenceBrowser-mt.154
Complements System-mt.1385
=============== Diff against PreferenceBrowser-mt.154 ===============
Item was added: + ----- Method: PreferenceBrowser>>initialExtentKey (in category 'initialize-release') ----- + initialExtentKey + + ^ { self class name . title }!
Item was changed: ----- Method: PreferenceBrowserMorph>>initializeWithModel: (in category 'initialization') ----- initializeWithModel: aPreferenceBrowser lastKeystrokeTime := 0. lastKeystrokes := ''. self defaultFocusMorph: #search; hResizing: #spaceFill; "Snap #extent to grid if enabled. See #worldGridEnabled." vResizing: #spaceFill; "Snap #extent to grid if enabled. See #worldGridEnabled." model: aPreferenceBrowser; setLabel: self model windowTitle; name: 'PreferenceBrowser'; addMorph: self rootPanel fullFrame: self rootPanelLayoutFrame; addMorph: self newButtonRow fullFrame: self buttonRowLayoutFrame; "Set bounds like the MorphicToolBuilder does when building windows." bounds: (RealEstateAgent initialFrameFor: self + initialExtent: ((RealEstateAgent savedExtentFor: aPreferenceBrowser) + ifNil: [aPreferenceBrowser initialExtent] + ifNotNil: [:initialExtent | (initialExtent * RealEstateAgent scaleFactor) rounded]) - initialExtent: aPreferenceBrowser initialExtent world: self currentWorld).!
packages@lists.squeakfoundation.org