ui.gadgets: remove 'set-gadget-delegate'

db4
Eduardo Cavazos 2008-07-18 18:02:21 -05:00
parent 01c6c8608e
commit 6f500fde6b
1 changed files with 0 additions and 4 deletions

View File

@ -361,10 +361,6 @@ M: f request-focus-on 2drop ;
[ focus>> ] follow ;
! Deprecated
: set-gadget-delegate ( gadget tuple -- )
over [
dup pick [ (>>parent) ] with each-child
] when set-delegate ;
: construct-gadget ( class -- tuple )
>r <gadget> { set-delegate } r> construct ; inline