Remove 'set-gadget-dim'
parent
5fcff67c9c
commit
8bf0500b26
|
@ -65,10 +65,6 @@ HELP: relayout-1
|
||||||
|
|
||||||
{ relayout relayout-1 } related-words
|
{ relayout relayout-1 } related-words
|
||||||
|
|
||||||
HELP: set-gadget-dim
|
|
||||||
{ $values { "dim" "a pair of integers" } { "gadget" gadget } }
|
|
||||||
{ $description "Resizes and relayouts a gadget before the next iteration of the event loop." } ;
|
|
||||||
|
|
||||||
HELP: pref-dim*
|
HELP: pref-dim*
|
||||||
{ $values { "gadget" gadget } { "dim" "a pair of integers" } }
|
{ $values { "gadget" gadget } { "dim" "a pair of integers" } }
|
||||||
{ $contract "Outputs the preferred dimensions of the gadget, possibly computing them from the preferred dimensions of the gadget's children." }
|
{ $contract "Outputs the preferred dimensions of the gadget, possibly computing them from the preferred dimensions of the gadget's children." }
|
||||||
|
|
|
@ -176,8 +176,6 @@ M: gadget (>>dim) ( dim gadget -- )
|
||||||
[ tuck call-next-method do-invalidate drop ]
|
[ tuck call-next-method do-invalidate drop ]
|
||||||
if ;
|
if ;
|
||||||
|
|
||||||
: set-gadget-dim ( dim gadget -- ) (>>dim) ;
|
|
||||||
|
|
||||||
GENERIC: pref-dim* ( gadget -- dim )
|
GENERIC: pref-dim* ( gadget -- dim )
|
||||||
|
|
||||||
: ?set-gadget-pref-dim ( dim gadget -- )
|
: ?set-gadget-pref-dim ( dim gadget -- )
|
||||||
|
|
|
@ -236,8 +236,7 @@ $nl
|
||||||
|
|
||||||
ARTICLE: "ui-null-layout" "Manual layouts"
|
ARTICLE: "ui-null-layout" "Manual layouts"
|
||||||
"When automatic layout is not appropriate, gadgets can be added to a parent with no layout policy, and then positioned and sized manually:"
|
"When automatic layout is not appropriate, gadgets can be added to a parent with no layout policy, and then positioned and sized manually:"
|
||||||
{ $subsection set-rect-loc }
|
{ $subsection set-rect-loc } ;
|
||||||
{ $subsection set-gadget-dim } ;
|
|
||||||
|
|
||||||
ARTICLE: "ui-layout-impl" "Implementing layout gadgets"
|
ARTICLE: "ui-layout-impl" "Implementing layout gadgets"
|
||||||
"The relayout process proceeds top-down, with parents laying out their children, which in turn lay out their children. Custom layout policy is implemented by defining a method on a generic word:"
|
"The relayout process proceeds top-down, with parents laying out their children, which in turn lay out their children. Custom layout policy is implemented by defining a method on a generic word:"
|
||||||
|
|
Loading…
Reference in New Issue