removed demo from poppers
parent
d65be18dce
commit
9d3fe3fd9a
|
@ -3,7 +3,7 @@
|
|||
USING: arrays accessors combinators kernel math
|
||||
models models.combinators namespaces sequences
|
||||
ui.gadgets ui.gadgets.controls ui.gadgets.layout
|
||||
ui.gadgets.tracks ui.gestures ui.gadgets.line-support ui ;
|
||||
ui.gadgets.tracks ui.gestures ui.gadgets.line-support ;
|
||||
EXCLUDE: ui.gadgets.editors => model-field ;
|
||||
IN: ui.gadgets.poppers
|
||||
|
||||
|
@ -47,7 +47,4 @@ M: popper model-changed
|
|||
[ [ value>> [ <popped> ] map ] dip [ f track-add ] reduce request-focus ] bi ;
|
||||
|
||||
M: popped pref-dim* editor>> [ pref-dim* first ] [ line-height ] bi 2array ;
|
||||
M: popper focusable-child* children>> [ t ] [ first ] if-empty ;
|
||||
|
||||
: tester ( -- ) { "ha" "ba" "Ra" } <model> <popper> { 100 100 } >>pref-dim "testing" open-window ;
|
||||
MAIN: tester
|
||||
M: popper focusable-child* children>> [ t ] [ first ] if-empty ;
|
Loading…
Reference in New Issue