ui.gadgets: remove '(set-rect-dim)'

db4
Eduardo Cavazos 2008-07-21 17:07:59 -05:00
parent 22fb3f329c
commit f1f7fe5dd8
1 changed files with 0 additions and 7 deletions

View File

@ -165,13 +165,6 @@ DEFER: relayout
: 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?
: do-invalidate ( gadget -- gadget )