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

Kill ui.gadgets.theme

db4
Slava Pestov 2009-02-14 19:50:22 -06:00
parent 6bbb4630f3
commit 9ebc487f44
18 changed files with 44 additions and 102 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
basis/ui/gadgets/buttons/buttons-docs.factor
View File

@ -17,13 +17,13 @@ HELP: <roll-button>
{ $values { "label" "a label specifier" } { "quot" { $quotation "( button -- )" } } { "button" button } } { $values { "label" "a label specifier" } { "quot" { $quotation "( button -- )" } } { "button" button } }
{ $description "Creates a new " { $link button } " which is displayed with a solid border when it is under the mouse, informing the user that the gadget is clickable." } ; { $description "Creates a new " { $link button } " which is displayed with a solid border when it is under the mouse, informing the user that the gadget is clickable." } ;
HELP: <bevel-button> HELP: <border-button>
{ $values { "label" "a label specifier" } { "quot" { $quotation "( button -- )" } } { "button" button } } { $values { "label" "a label specifier" } { "quot" { $quotation "( button -- )" } } { "button" button } }
{ $description "Creates a new " { $link button } " with a shaded border which is always visible. The button appearance changes in response to mouse gestures using a " { $link button-pen } "." } ; { $description "Creates a new " { $link button } " with a border which is always visible. The button appearance changes in response to mouse gestures using a " { $link button-pen } "." } ;
HELP: <repeat-button> HELP: <repeat-button>
{ $values { "label" object } { "quot" { $quotation "( button -- )" } } { "button" repeat-button } } { $values { "label" object } { "quot" { $quotation "( button -- )" } } { "button" repeat-button } }
{ $description "Creates a new " { $link button } " derived from a " { $link <bevel-button> } " which calls the quotation every 100 milliseconds as long as the mouse button is held down." } ; { $description "Creates a new " { $link button } " derived from a " { $link <border-button> } " which calls the quotation every 100 milliseconds as long as the mouse button is held down." } ;
HELP: button-pen HELP: button-pen
{ $class-description "A class implementing the " { $link draw-boundary } " and " { $link draw-interior } " gneeric words by delegating to an object in one of four slots which depend on the state of the button being drawn:" { $class-description "A class implementing the " { $link draw-boundary } " and " { $link draw-interior } " gneeric words by delegating to an object in one of four slots which depend on the state of the button being drawn:"
@ -33,12 +33,12 @@ HELP: button-pen
{ { $snippet "pressed" } " - the button is under the mouse and a mouse button is held down" } { { $snippet "pressed" } " - the button is under the mouse and a mouse button is held down" }
{ { $snippet "selected" } " - the button is selected (see " { $link <toggle-buttons> } } { { $snippet "selected" } " - the button is selected (see " { $link <toggle-buttons> } }
} }
"The " { $link <roll-button> } " and " { $link <bevel-button> } " words create " { $link button } " instances with specific " { $link button-pen } "." } ; "The " { $link <roll-button> } " and " { $link <border-button> } " words create " { $link button } " instances with specific " { $link button-pen } "." } ;
HELP: <toggle-button> HELP: <toggle-button>
{ $values { "model" model } { "value" object } { "label" "a label specifier" } { "gadget" gadget } } { $values { "model" model } { "value" object } { "label" "a label specifier" } { "gadget" gadget } }
{ $description { $description
"Creates a " { $link <bevel-button> } " which sets the model's value to " { $snippet "value" } " when pressed. After being pressed, the button becomes selected until the value of the model changes again." "Creates a " { $link <border-button> } " which sets the model's value to " { $snippet "value" } " when pressed. After being pressed, the button becomes selected until the value of the model changes again."
} }
{ $notes "Typically a row of radio controls should be built together using " { $link <toggle-buttons> } "." } ; { $notes "Typically a row of radio controls should be built together using " { $link <toggle-buttons> } "." } ;
@ -48,7 +48,7 @@ HELP: <toggle-buttons>
HELP: <command-button> HELP: <command-button>
{ $values { "target" object } { "gesture" "a gesture" } { "command" "a command" } { "button" "a new " { $link button } } } { $values { "target" object } { "gesture" "a gesture" } { "command" "a command" } { "button" "a new " { $link button } } }
{ $description "Creates a " { $link <bevel-button> } " which invokes the command on " { $snippet "target" } " when clicked." } ; { $description "Creates a " { $link <border-button> } " which invokes the command on " { $snippet "target" } " when clicked." } ;
HELP: <toolbar> HELP: <toolbar>
{ $values { "target" object } { "toolbar" gadget } } { $values { "target" object } { "toolbar" gadget } }
@ -60,7 +60,7 @@ ARTICLE: "ui.gadgets.buttons" "Button gadgets"
"There are many ways to create a new button:" "There are many ways to create a new button:"
{ $subsection <button> } { $subsection <button> }
{ $subsection <roll-button> } { $subsection <roll-button> }
{ $subsection <bevel-button> } { $subsection <border-button> }
{ $subsection <repeat-button> } { $subsection <repeat-button> }
"Gadgets for invoking commands:" "Gadgets for invoking commands:"
{ $subsection <command-button> } { $subsection <command-button> }

18
basis/ui/gadgets/buttons/buttons.factor
View File

@ -3,7 +3,7 @@
USING: accessors arrays kernel math models namespaces sequences USING: accessors arrays kernel math models namespaces sequences
strings quotations assocs combinators classes colors colors.constants strings quotations assocs combinators classes colors colors.constants
classes.tuple opengl opengl.gl math.vectors ui.commands ui.gadgets classes.tuple opengl opengl.gl math.vectors ui.commands ui.gadgets
ui.gadgets.borders ui.gadgets.labels ui.gadgets.theme ui.gadgets.borders ui.gadgets.labels
ui.gadgets.tracks ui.gadgets.packs ui.gadgets.worlds ui.gestures ui.gadgets.tracks ui.gadgets.packs ui.gadgets.worlds ui.gestures
ui.pens ui.pens.solid ui.pens.image math.rectangles locals ui.pens ui.pens.solid ui.pens.image math.rectangles locals
fry combinators.smart ; fry combinators.smart ;
@ -90,7 +90,7 @@ M: button-pen pen-pref-dim
: <roll-button> ( label quot -- button ) : <roll-button> ( label quot -- button )
<button> roll-button-theme ; <button> roll-button-theme ;
: <bevel-button-paint> ( -- paint ) : <border-button-pen> ( -- paint )
plain-gradient plain-gradient
rollover-gradient rollover-gradient
pressed-gradient pressed-gradient
@ -98,13 +98,13 @@ M: button-pen pen-pref-dim
selected-gradient selected-gradient
<button-pen> ; <button-pen> ;
: bevel-button-theme ( gadget -- gadget ) : border-button-theme ( gadget -- gadget )
<bevel-button-paint> >>interior <border-button-pen> >>interior
{ 5 5 } >>size { 5 5 } >>size
faint-boundary ; inline faint-boundary ; inline
: <bevel-button> ( label quot -- button ) : <border-button> ( label quot -- button )
<button> bevel-button-theme ; <button> border-button-theme ;
TUPLE: repeat-button < button ; TUPLE: repeat-button < button ;
@ -117,7 +117,7 @@ repeat-button H{
: <repeat-button> ( label quot -- button ) : <repeat-button> ( label quot -- button )
#! Button that calls the quotation every 100ms as long as #! Button that calls the quotation every 100ms as long as
#! the mouse is held down. #! the mouse is held down.
repeat-button new-button bevel-button-theme ; repeat-button new-button border-button-theme ;
: <checkmark-paint> ( -- pen ) : <checkmark-paint> ( -- pen )
"checkbox" theme-image <image-pen> "checkbox" theme-image <image-pen>
@ -184,7 +184,7 @@ M: radio-control model-changed
{ 5 5 } >>gap ; { 5 5 } >>gap ;
: <toggle-button> ( value model label -- gadget ) : <toggle-button> ( value model label -- gadget )
<radio-control> bevel-button-theme ; <radio-control> border-button-theme ;
: <toggle-buttons> ( model assoc -- gadget ) : <toggle-buttons> ( model assoc -- gadget )
<shelf> <shelf>
@ -194,7 +194,7 @@ M: radio-control model-changed
'[ _ _ invoke-command drop ] ; '[ _ _ invoke-command drop ] ;
: <command-button> ( target gesture command -- button ) : <command-button> ( target gesture command -- button )
[ command-string swap ] keep command-button-quot <bevel-button> ; [ command-string swap ] keep command-button-quot <border-button> ;
: <toolbar> ( target -- toolbar ) : <toolbar> ( target -- toolbar )
<shelf> <shelf>

4
basis/ui/gadgets/canvas/canvas.factor
View File

@ -1,6 +1,6 @@
! Copyright (C) 2007 Slava Pestov. ! Copyright (C) 2007 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: ui.backend ui.gadgets ui.gadgets.theme USING: ui.backend ui.gadgets
ui.gadgets.worlds ui.render opengl opengl.gl kernel namespaces ui.gadgets.worlds ui.render opengl opengl.gl kernel namespaces
classes.tuple colors accessors ; classes.tuple colors accessors ;
IN: ui.gadgets.canvas IN: ui.gadgets.canvas
@ -8,7 +8,7 @@ IN: ui.gadgets.canvas
TUPLE: canvas < gadget dlist ; TUPLE: canvas < gadget dlist ;
: new-canvas ( class -- canvas ) : new-canvas ( class -- canvas )
new-gadget black solid-interior ; inline new-gadget black <solid> >>interior ; inline
: delete-canvas-dlist ( canvas -- ) : delete-canvas-dlist ( canvas -- )
[ find-gl-context ] [ find-gl-context ]

2
basis/ui/gadgets/debug/debug.factor
View File

@ -18,7 +18,7 @@ M: baseline-gadget baseline baseline>> ;
: <bad-button> ( -- button ) : <bad-button> ( -- button )
"Click me if you dare" "Click me if you dare"
[ "Haha" throw ] [ "Haha" throw ]
<bevel-button> ; <border-button> ;
TUPLE: bad-gadget < gadget ; TUPLE: bad-gadget < gadget ;

2
basis/ui/gadgets/editors/editors.factor
View File

@ -6,7 +6,7 @@ opengl.gl sequences strings math.vectors math.functions sorting colors
colors.constants combinators assocs math.order fry calendar alarms colors.constants combinators assocs math.order fry calendar alarms
continuations ui.clipboards ui.commands ui.gadgets ui.gadgets.borders continuations ui.clipboards ui.commands ui.gadgets ui.gadgets.borders
ui.gadgets.buttons ui.gadgets.labels ui.gadgets.scrollers ui.gadgets.buttons ui.gadgets.labels ui.gadgets.scrollers
ui.gadgets.theme ui.gadgets.menus ui.gadgets.wrappers ui.render ui.gadgets.menus ui.gadgets.wrappers ui.render
ui.pens.solid ui.gadgets.line-support ui.text ui.gestures ui.pens.solid ui.gadgets.line-support ui.text ui.gestures
math.rectangles splitting unicode.categories fonts grouping ; math.rectangles splitting unicode.categories fonts grouping ;
IN: ui.gadgets.editors IN: ui.gadgets.editors

3
basis/ui/gadgets/labeled/labeled.factor
View File

@ -2,7 +2,7 @@
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: accessors kernel sequences colors fonts ui.gadgets USING: accessors kernel sequences colors fonts ui.gadgets
ui.gadgets.frames ui.gadgets.grids ui.gadgets.icons ui.gadgets.labels ui.gadgets.frames ui.gadgets.grids ui.gadgets.icons ui.gadgets.labels
ui.gadgets.theme ui.gadgets.borders ui.pens.image ; ui.gadgets.borders ui.pens.image ;
IN: ui.gadgets.labeled IN: ui.gadgets.labeled
TUPLE: labeled-gadget < frame content ; TUPLE: labeled-gadget < frame content ;
@ -15,7 +15,6 @@ TUPLE: labeled-gadget < frame content ;
: labeled-icon ( name -- icon ) : labeled-icon ( name -- icon )
labeled-image <icon> dup interior>> t >>fill? drop ; labeled-image <icon> dup interior>> t >>fill? drop ;
CONSTANT: labeled-title-background CONSTANT: labeled-title-background
T{ rgba f T{ rgba f
0.7843137254901961 0.7843137254901961

5
basis/ui/gadgets/menus/menus.factor
View File

@ -3,7 +3,7 @@
USING: colors.constants kernel locals math.rectangles USING: colors.constants kernel locals math.rectangles
namespaces sequences ui.commands ui.gadgets ui.gadgets.borders namespaces sequences ui.commands ui.gadgets ui.gadgets.borders
ui.gadgets.buttons ui.gadgets.glass ui.gadgets.packs ui.gadgets.buttons ui.gadgets.glass ui.gadgets.packs
ui.gadgets.theme ui.gadgets.worlds ui.gestures ui.operations ; ui.gadgets.worlds ui.gestures ui.operations ;
IN: ui.gadgets.menus IN: ui.gadgets.menus
: show-menu ( owner menu -- ) : show-menu ( owner menu -- )
@ -17,8 +17,7 @@ IN: ui.gadgets.menus
] <roll-button> ; ] <roll-button> ;
: menu-theme ( gadget -- gadget ) : menu-theme ( gadget -- gadget )
COLOR: light-gray solid-interior COLOR: light-gray <solid> >>interior ;
faint-boundary ;
: <commands-menu> ( target hook commands -- menu ) : <commands-menu> ( target hook commands -- menu )
[ <filled-pile> ] 3dip [ <filled-pile> ] 3dip

6
basis/ui/gadgets/panes/panes.factor
View File

@ -6,7 +6,7 @@ sorting splitting assocs classes.tuple models continuations
destructors accessors math.rectangles fry fonts ui.images ui.gadgets destructors accessors math.rectangles fry fonts ui.images ui.gadgets
ui.gadgets.private ui.gadgets.borders ui.gadgets.buttons ui.gadgets.private ui.gadgets.borders ui.gadgets.buttons
ui.gadgets.labels ui.gadgets.scrollers ui.gadgets.paragraphs ui.gadgets.labels ui.gadgets.scrollers ui.gadgets.paragraphs
ui.gadgets.incremental ui.gadgets.packs ui.gadgets.theme ui.gadgets.incremental ui.gadgets.packs
ui.gadgets.menus ui.clipboards ui.gestures ui.traverse ui.render ui.gadgets.menus ui.clipboards ui.gestures ui.traverse ui.render
ui.text ui.gadgets.presentations ui.gadgets.grids ui.gadgets.tracks ui.text ui.gadgets.presentations ui.gadgets.grids ui.gadgets.tracks
ui.gadgets.icons ui.gadgets.grid-lines colors call ; ui.gadgets.icons ui.gadgets.grid-lines colors call ;
@ -231,10 +231,10 @@ MEMO: specified-font ( assoc -- font )
] apply-style ; ] apply-style ;
: apply-border-color-style ( style gadget -- style gadget ) : apply-border-color-style ( style gadget -- style gadget )
border-color [ solid-boundary ] apply-style ; border-color [ <solid> >>boundary ] apply-style ;
: apply-page-color-style ( style gadget -- style gadget ) : apply-page-color-style ( style gadget -- style gadget )
page-color [ solid-interior ] apply-style ; page-color [ <solid> >>interior ] apply-style ;
: apply-border-width-style ( style gadget -- style gadget ) : apply-border-width-style ( style gadget -- style gadget )
border-width [ dup 2array <border> ] apply-style ; border-width [ dup 2array <border> ] apply-style ;

2
basis/ui/gadgets/presentations/presentations-docs.factor
View File

@ -33,7 +33,7 @@ HELP: <presentation>
{ $description "Creates a new " { $link presentation } " derived from " { $link <roll-button> } "." } { $description "Creates a new " { $link presentation } " derived from " { $link <roll-button> } "." }
{ $see-also "presentations" } ; { $see-also "presentations" } ;
{ <button> <bevel-button> <command-button> <roll-button> <presentation> } related-words { <button> <border-button> <command-button> <roll-button> <presentation> } related-words
{ <status-bar> show-mouse-help show-status show-summary hide-status } related-words { <status-bar> show-mouse-help show-status show-summary hide-status } related-words

4
basis/ui/gadgets/scrollers/scrollers-tests.factor
View File

@ -88,7 +88,7 @@ dup layout
[ f ] [ "s" get @right grid-child find-scroller* ] unit-test [ f ] [ "s" get @right grid-child find-scroller* ] unit-test
[ ] [ [ ] [
"Click Me" [ [ scroll>gadget ] [ unparent ] bi ] <bevel-button> "Click Me" [ [ scroll>gadget ] [ unparent ] bi ] <border-button>
[ <pile> swap add-gadget <scroller> ] keep [ <pile> swap add-gadget <scroller> ] keep
dup quot>> call dup quot>> call
layout layout
@ -96,7 +96,7 @@ dup layout
[ t ] [ [ t ] [
<gadget> { 200 200 } >>dim <gadget> { 200 200 } >>dim
[ [ scroll>gadget ] [ unparent ] bi ] <bevel-button> [ [ scroll>gadget ] [ unparent ] bi ] <border-button>
dup dup
<pile> swap add-gadget <scroller> { 100 100 } >>dim dup layout <pile> swap add-gadget <scroller> { 100 100 } >>dim dup layout
swap dup quot>> call swap dup quot>> call

2
basis/ui/gadgets/scrollers/scrollers.factor
View File

@ -1,7 +1,7 @@
! Copyright (C) 2005, 2009 Slava Pestov. ! Copyright (C) 2005, 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: accessors arrays ui.gadgets ui.gadgets.viewports USING: accessors arrays ui.gadgets ui.gadgets.viewports
ui.gadgets.frames ui.gadgets.grids ui.gadgets.theme ui.gadgets.frames ui.gadgets.grids
ui.gadgets.sliders ui.gestures kernel math namespaces sequences ui.gadgets.sliders ui.gestures kernel math namespaces sequences
models models.range models.compose combinators math.vectors models models.range models.compose combinators math.vectors
classes.tuple math.rectangles combinators.short-circuit ; classes.tuple math.rectangles combinators.short-circuit ;

2
basis/ui/gadgets/sliders/sliders.factor
View File

@ -4,7 +4,7 @@ USING: accessors arrays assocs kernel math namespaces sequences
vectors models models.range math.vectors math.functions quotations vectors models models.range math.vectors math.functions quotations
colors colors.constants math.rectangles fry combinators ui.gestures colors colors.constants math.rectangles fry combinators ui.gestures
ui.pens ui.gadgets ui.gadgets.buttons ui.gadgets.tracks math.order ui.pens ui.gadgets ui.gadgets.buttons ui.gadgets.tracks math.order
ui.gadgets.theme ui.gadgets.icons ui.pens.tile ui.pens.image ; ui.gadgets.icons ui.pens.tile ui.pens.image ;
IN: ui.gadgets.sliders IN: ui.gadgets.sliders
TUPLE: slider < track elevator thumb saved line ; TUPLE: slider < track elevator thumb saved line ;

2
basis/ui/gadgets/tables/tables.factor
View File

@ -3,7 +3,7 @@
USING: accessors arrays colors colors.constants fry kernel math USING: accessors arrays colors colors.constants fry kernel math
math.rectangles math.order math.vectors namespaces opengl sequences math.rectangles math.order math.vectors namespaces opengl sequences
ui.gadgets ui.gadgets.scrollers ui.gadgets.status-bar ui.gadgets ui.gadgets.scrollers ui.gadgets.status-bar
ui.gadgets.worlds ui.gadgets.theme ui.gestures ui.render ui.text ui.gadgets.worlds ui.gestures ui.render ui.text
ui.images ui.gadgets.menus ui.gadgets.line-support math.rectangles ui.images ui.gadgets.menus ui.gadgets.line-support math.rectangles
models math.ranges sequences combinators fonts locals strings ; models math.ranges sequences combinators fonts locals strings ;
IN: ui.gadgets.tables IN: ui.gadgets.tables

63
basis/ui/gadgets/theme/theme.factor
View File

@ -1,63 +0,0 @@
! Copyright (C) 2005, 2009 Slava Pestov.
! Copyright (C) 2006, 2007 Alex Chapman.
! See http://factorcode.org/license.txt for BSD license.
USING: arrays kernel sequences ui.gadgets ui.pens.solid
ui.pens.gradient ui.text ui.images colors colors.gray
colors.constants accessors io.pathnames ;
QUALIFIED: colors
IN: ui.gadgets.theme
: theme-image ( name -- image-name )
"resource:basis/ui/gadgets/theme/" prepend-path ".tiff" append <image-name> ;
: solid-interior ( gadget color -- gadget )
<solid> >>interior ; inline
: solid-boundary ( gadget color -- gadget )
<solid> >>boundary ; inline
: faint-boundary ( gadget -- gadget )
COLOR: gray solid-boundary ; inline
: selection-color ( -- color ) T{ rgba f 0.8 0.8 1.0 1.0 } ; inline
: focus-border-color ( -- color ) COLOR: dark-gray ; inline
: plain-gradient ( -- gradient )
{
T{ gray f 0.94 1.0 }
T{ gray f 0.83 1.0 }
T{ gray f 0.83 1.0 }
T{ gray f 0.62 1.0 }
} <gradient> ;
: rollover-gradient ( -- gradient )
{
T{ gray f 1.0 1.0 }
T{ gray f 0.9 1.0 }
T{ gray f 0.9 1.0 }
T{ gray f 0.75 1.0 }
} <gradient> ;
: pressed-gradient ( -- gradient )
{
T{ gray f 0.75 1.0 }
T{ gray f 0.9 1.0 }
T{ gray f 0.9 1.0 }
T{ gray f 1.0 1.0 }
} <gradient> ;
: selected-gradient ( -- gradient )
{
T{ gray f 0.65 1.0 }
T{ gray f 0.8 1.0 }
T{ gray f 0.8 1.0 }
T{ gray f 1.0 1.0 }
} <gradient> ;
: lowered-gradient ( -- gradient )
{
T{ gray f 0.37 1.0 }
T{ gray f 0.43 1.0 }
T{ gray f 0.5 1.0 }
} <gradient> ;

7
basis/ui/pens/image/image.factor
View File

@ -1,7 +1,7 @@
! Copyright (C) 2009 Slava Pestov. ! Copyright (C) 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: kernel accessors sequences fry math USING: kernel accessors sequences fry math
opengl ui.pens ui.images ; opengl ui.pens ui.images io.pathnames ;
IN: ui.pens.image IN: ui.pens.image
! Image pen ! Image pen
@ -16,4 +16,7 @@ M: image-pen draw-interior
'[ _ draw-image ] with-translation '[ _ draw-image ] with-translation
] if ; ] if ;
M: image-pen pen-pref-dim nip image>> image-dim ; M: image-pen pen-pref-dim nip image>> image-dim ;
: theme-image ( name -- image-name )
"resource:basis/ui/gadgets/theme/" prepend-path ".tiff" append <image-name> ;

6
basis/ui/render/render.factor
View File

@ -86,4 +86,8 @@ DEFER: draw-gadget
{ [ dup visible?>> not ] [ drop ] } { [ dup visible?>> not ] [ drop ] }
{ [ dup clipped?>> not ] [ (draw-gadget) ] } { [ dup clipped?>> not ] [ (draw-gadget) ] }
[ [ (draw-gadget) ] with-clipping ] [ [ (draw-gadget) ] with-clipping ]
} cond ; } cond ;
CONSTANT: selection-color T{ rgba f 0.8 0.8 1.0 1.0 }
CONSTANT: focus-border-color COLOR: dark-gray

2
basis/ui/tools/inspector/inspector.factor
View File

@ -6,7 +6,7 @@ io io.styles arrays hashtables math.order sorting refs fonts
ui.tools.browser ui.commands ui.operations ui.gadgets ui.gadgets.panes ui.tools.browser ui.commands ui.operations ui.gadgets ui.gadgets.panes
ui.gadgets.scrollers ui.gadgets.slots ui.gadgets.tracks ui.gadgets.scrollers ui.gadgets.slots ui.gadgets.tracks
ui.gestures ui.gadgets.buttons ui.gadgets.tables ui.gestures ui.gadgets.buttons ui.gadgets.tables
ui.gadgets.status-bar ui.gadgets.theme ui.gadgets.labeled ui.gadgets.status-bar ui.gadgets.labeled
ui.tools.common ui ; ui.tools.common ui ;
IN: ui.tools.inspector IN: ui.tools.inspector

2
basis/ui/tools/listener/completion/completion.factor
View File

@ -7,7 +7,7 @@ parser present sequences tools.completion tools.vocabs.browser generic
generic.standard.engines.tuple fonts definitions.icons ui.images generic.standard.engines.tuple fonts definitions.icons ui.images
ui.commands ui.operations ui.gadgets ui.gadgets.editors ui.commands ui.operations ui.gadgets ui.gadgets.editors
ui.gadgets.glass ui.gadgets.scrollers ui.gadgets.tables ui.gadgets.glass ui.gadgets.scrollers ui.gadgets.tables
ui.gadgets.tracks ui.gadgets.labeled ui.gadgets.theme ui.gadgets.tracks ui.gadgets.labeled
ui.gadgets.worlds ui.gadgets.wrappers ui.gestures ui.pens.solid ui.gadgets.worlds ui.gadgets.wrappers ui.gestures ui.pens.solid
ui.tools.listener.history combinators vocabs ui.tools.listener.popups ; ui.tools.listener.history combinators vocabs ui.tools.listener.popups ;
IN: ui.tools.listener.completion IN: ui.tools.listener.completion