Marcel Taeumel uploaded a new version of PreferenceBrowser to project The Trunk: http://source.squeak.org/trunk/PreferenceBrowser-mt.113.mcz
==================== Summary ====================
Name: PreferenceBrowser-mt.113 Author: mt Time: 3 March 2021, 8:04:40.386712 am UUID: ae453663-399c-804e-9c2e-df714093e1d6 Ancestors: PreferenceBrowser-mt.112, PreferenceBrowser-ct.101
Merge fix for preferences tool to honor "open attached to mouse" preference.
=============== Diff against PreferenceBrowser-mt.112 ===============
Item was changed: ----- Method: PreferenceBrowser class>>open (in category 'instance creation') ----- open | browser | browser := self new. (PreferenceBrowserMorph withModel: browser) + openAsTool. - openInWorld. ^browser. !
Item was changed: ----- Method: PreferenceBrowser>>initialize (in category 'initialize-release') ----- initialize + super initialize. preferences := Preferences. title := 'Preference Browser'.!
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." 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: aPreferenceBrowser initialExtent + world: self currentWorld).! - addMorph: self newButtonRow fullFrame: self buttonRowLayoutFrame.!
packages@lists.squeakfoundation.org