ui.gadgets: remove '(set-rect-dim)'
parent
22fb3f329c
commit
f1f7fe5dd8
|
@ -165,13 +165,6 @@ DEFER: relayout
|
||||||
|
|
||||||
: hide-gadget ( gadget -- ) f swap (>>visible?) ;
|
: hide-gadget ( gadget -- ) f swap (>>visible?) ;
|
||||||
|
|
||||||
: (set-rect-dim) ( dim gadget quot -- )
|
|
||||||
>r 2dup rect-dim =
|
|
||||||
[ [ 2drop ] [ set-rect-dim ] if ] 2keep
|
|
||||||
[ drop ] r> if ; inline
|
|
||||||
|
|
||||||
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
||||||
|
|
||||||
DEFER: in-layout?
|
DEFER: in-layout?
|
||||||
|
|
||||||
: do-invalidate ( gadget -- gadget )
|
: do-invalidate ( gadget -- gadget )
|
||||||
|
|
Loading…
Reference in New Issue