On Wed, Apr 15, 2015 at 5:03 PM, <commits at source.squeak.org> wrote:

> Marcel Taeumel uploaded a new version of ToolBuilder-Morphic to project
> The Trunk:
> http://source.squeak.org/trunk/ToolBuilder-Morphic-mt.131.mcz
>
> ==================== Summary ====================
>
> Name: ToolBuilder-Morphic-mt.131
> Author: mt
> Time: 15 April 2015, 5:03:08.876 pm
> UUID: 9edadf2c-970c-f343-ab24-cf92eb411835
> Ancestors: ToolBuilder-Morphic-mt.130
>
> Avoid clipping submorphs in panels. Should not be required in general.
>
> Why? Retractable scrollbars will else not be possible.
>

Hi,
I think the issue is that if you scale down a browser window the buttons
will now stick out on right side of the browser.

Karl



>
> =============== Diff against ToolBuilder-Morphic-mt.130 ===============
>
> Item was changed:
>   ----- Method: MorphicToolBuilder>>buildPluggablePanel: (in category
> 'widgets required') -----
>   buildPluggablePanel: aSpec
>         | widget children frame |
>         widget := self panelClass new.
>         self register: widget id: aSpec name.
>         widget model: aSpec model.
>         widget color: Color transparent.
> -       widget clipSubmorphs: true.
>         children := aSpec children.
>         children isSymbol ifTrue:[
>                 widget getChildrenSelector: children.
>                 widget update: children.
>                 children := #().
>         ].
>         self buildAll: children in: widget.
>         self buildHelpFor: widget spec: aSpec.
>         self setFrame: aSpec frame in: widget.
>         parent ifNotNil:[self add: widget to: parent].
>         self setLayout: aSpec layout in: widget.
>         widget layoutInset: 0.
>         widget borderWidth: 0.
>         widget submorphsDo:[:sm|
>                 (frame := sm layoutFrame) ifNotNil:[
>                         (frame rightFraction = 0 or:[frame rightFraction =
> 1])
>                                 ifFalse:[frame rightOffset:1].
>                         (frame bottomFraction = 0 or:[frame bottomFraction
> = 1])
>                                 ifFalse:[frame bottomOffset: 1]]].
>         widget color: Color transparent.
>         ^widget!
>
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20150415/92c91de8/attachment.htm