Andreas Raab uploaded a new version of Monticello to project The Trunk: http://source.squeak.org/trunk/Monticello-bp.387.mcz
==================== Summary ====================
Name: Monticello-bp.387 Author: bp Time: 2 April 2010, 11:40:29.553 pm UUID: 1807cd8e-3bdb-4b59-b97a-b6264af5b2ce Ancestors: Monticello-nice.386
fix height on button rows in Monticello tools
=============== Diff against Monticello-nice.386 ===============
Item was changed: ----- Method: MCTool>>buildWith: (in category 'morphic ui') ----- buildWith: builder | windowBuilder |
windowBuilder := MCToolWindowBuilder builder: builder tool: self. self widgetSpecs do: + [:spec | | send fractions offsets | - [:spec | | send fractions offsets origin corner | send := spec first. fractions := spec at: 2 ifAbsent: [#(0 0 1 1)]. offsets := spec at: 3 ifAbsent: [#(0 0 0 0)]. + windowBuilder frame: (LayoutFrame + fractions: (fractions first @ fractions second corner: fractions third @ fractions fourth) + offsets: (offsets first @ offsets second corner: offsets third @ offsets fourth)). - origin := (offsets first @ offsets second) - / self defaultExtent asFloatPoint - + (fractions first @ fractions second). - corner := (offsets third @ offsets fourth) - / self defaultExtent asFloatPoint - + (fractions third @ fractions fourth). - windowBuilder frame: (origin corner: corner). windowBuilder perform: send first withArguments: send allButFirst].
^ windowBuilder build !
squeak-dev@lists.squeakfoundation.org