steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

removed demo from poppers

db4
Sam Anklesaria 2009-08-05 20:04:14 -05:00
parent d65be18dce
commit 9d3fe3fd9a
1 changed files with 2 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
extra/ui/gadgets/poppers/poppers.factor
View File

@ -3,7 +3,7 @@
USING: arrays accessors combinators kernel math USING: arrays accessors combinators kernel math
models models.combinators namespaces sequences models models.combinators namespaces sequences
ui.gadgets ui.gadgets.controls ui.gadgets.layout 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 ; EXCLUDE: ui.gadgets.editors => model-field ;
IN: ui.gadgets.poppers IN: ui.gadgets.poppers
@ -48,6 +48,3 @@ M: popper model-changed
M: popped pref-dim* editor>> [ pref-dim* first ] [ line-height ] bi 2array ; M: popped pref-dim* editor>> [ pref-dim* first ] [ line-height ] bi 2array ;
M: popper focusable-child* children>> [ t ] [ first ] if-empty ; M: popper focusable-child* children>> [ t ] [ first ] if-empty ;
: tester ( -- ) { "ha" "ba" "Ra" } <model> <popper> { 100 100 } >>pref-dim "testing" open-window ;
MAIN: tester