diff --git a/extra/ui/gadgets/poppers/poppers.factor b/extra/ui/gadgets/poppers/poppers.factor index 1b664ca407..1c815d5f3a 100644 --- a/extra/ui/gadgets/poppers/poppers.factor +++ b/extra/ui/gadgets/poppers/poppers.factor @@ -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>> [ ] 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" } { 100 100 } >>pref-dim "testing" open-window ; -MAIN: tester \ No newline at end of file +M: popper focusable-child* children>> [ t ] [ first ] if-empty ; \ No newline at end of file