USING: accessors assocs colors combinators combinators.short-circuit
combinators.smart fry kernel locals math.vectors memoize models
namespaces sequences ui.commands ui.gadgets ui.gadgets.borders
-ui.gadgets.labels ui.gadgets.packs ui.theme ui.gadgets.theme ui.gadgets.worlds
-ui.gestures ui.pens ui.pens.image ui.pens.solid ui.pens.tile ;
+ui.gadgets.labels ui.gadgets.packs ui.theme ui.gadgets.worlds
+ui.gestures ui.pens ui.pens.image ui.pens.solid ui.pens.tile
+ui.theme.images ;
FROM: models => change-model ;
IN: ui.gadgets.buttons
! See http://factorcode.org/license.txt for BSD license.
USING: accessors arrays colors.constants combinators fonts fry
kernel make math.functions models namespaces sequences splitting
-strings ui.baseline-alignment ui.gadgets ui.gadgets.theme
-ui.gadgets.tracks ui.pens.solid ui.render ui.text ;
+strings ui.baseline-alignment ui.gadgets ui.gadgets.tracks
+ui.pens.solid ui.render ui.text ui.theme.images ;
IN: ui.gadgets.labels
! A label gadget draws a string.
kernel locals models models.delay models.search
ui.baseline-alignment ui.gadgets ui.gadgets.borders
ui.gadgets.buttons ui.gadgets.editors ui.gadgets.labels
-ui.gadgets.scrollers ui.gadgets.tables ui.gadgets.theme
-ui.gadgets.tracks ui.gestures ui.pens ui.pens.image ;
+ui.gadgets.scrollers ui.gadgets.tables ui.gadgets.tracks
+ui.gestures ui.pens ui.pens.image ui.theme.images ;
IN: ui.gadgets.search-tables
TUPLE: search-table < track table field ;
! See http://factorcode.org/license.txt for BSD license.
USING: accessors assocs combinators fry kernel math math.order
math.vectors models models.range ui.gadgets ui.gadgets.buttons
-ui.gadgets.icons ui.gadgets.theme ui.gadgets.tracks ui.gestures
-ui.pens ui.pens.image ui.pens.tile ;
+ui.gadgets.icons ui.gadgets.tracks ui.gestures ui.pens
+ui.pens.image ui.pens.tile ui.theme.images ;
IN: ui.gadgets.sliders
TUPLE: slider < track elevator thumb saved line ;
USING: accessors colors.constants kernel models sequences
ui.gadgets ui.gadgets.books ui.gadgets.borders
ui.gadgets.buttons ui.gadgets.buttons.private ui.gadgets.icons
-ui.gadgets.packs ui.gadgets.theme ui.gadgets.tracks ui.pens ;
+ui.gadgets.packs ui.gadgets.tracks ui.pens ui.theme.images ;
IN: ui.gadgets.tabbed
TUPLE: tabbed-gadget < track tabs book ;
+++ /dev/null
-Slava Pestov
-Joe Groff
+++ /dev/null
-Common colors and gradients used by the UI
+++ /dev/null
-! Copyright (C) 2009, 2010 Slava Pestov, Joe Groff.
-! See http://factorcode.org/license.txt for BSD license.
-USING: accessors io.pathnames sequences ui.images ui.theme ;
-IN: ui.gadgets.theme
-
-: theme-image ( name -- image-name )
- "vocab:ui/gadgets/theme/" prepend-path ".tiff" append <image-name> ;
--- /dev/null
+Slava Pestov
+Joe Groff
--- /dev/null
+! Copyright (C) 2009, 2010 Slava Pestov, Joe Groff.
+! See http://factorcode.org/license.txt for BSD license.
+USING: io.pathnames sequences ui.images ;
+IN: ui.theme.images
+
+: theme-image ( name -- image-name )
+ "vocab:ui/theme/images/" prepend-path ".tiff" append <image-name> ;
--- /dev/null
+Common colors and gradients used by the UI
ui.gadgets.borders ui.gadgets.editors ui.gadgets.editors.private
ui.gadgets.glass ui.gadgets.labels ui.gadgets.labels.private
ui.gadgets.panes ui.gadgets.scrollers ui.gadgets.status-bar
-ui.theme ui.gadgets.theme ui.gadgets.toolbar ui.gadgets.tracks
+ui.theme ui.gadgets.toolbar ui.gadgets.tracks
ui.gadgets.viewports ui.gadgets.worlds ui.gestures ui.pens.solid
-ui.render ui.text ui.tools.common ui.tools.browser.history
-ui.tools.browser.popups vocabs ;
+ui.render ui.text ui.theme.images ui.tools.common
+ui.tools.browser.history ui.tools.browser.popups vocabs ;
IN: ui.tools.browser
TUPLE: browser-gadget < tool history scroller search-field popup ;
definitions.icons fry help help.topics kernel math.rectangles
models.arrow namespaces sequences tools.crossref ui.gadgets
ui.gadgets.glass ui.gadgets.labeled ui.gadgets.search-tables
-ui.gadgets.tables ui.gadgets.theme ui.gadgets.wrappers ui.gestures ui.images
-ui.operations ui.pens.solid ui.theme ;
+ui.gadgets.tables ui.gadgets.wrappers ui.gestures ui.images
+ui.operations ui.pens.solid ui.theme ui.theme.images ;
FROM: ui.gadgets.wrappers => wrapper ;
IN: ui.tools.browser.popups
ui.gadgets.worlds ui.gadgets.packs ui.gadgets.buttons
ui.gadgets.labels ui.gadgets.presentations ui.gadgets.panes
ui.gadgets.viewports ui.gadgets.tables ui.theme
-ui.gadgets.theme ui.gadgets.tracks ui.gadgets.toolbar
-ui.gadgets.scrollers ui.gadgets.borders ui.gadgets.status-bar
-ui.tools.traceback ui.tools.inspector ui.tools.browser ui.tools.common ;
+ui.gadgets.tracks ui.gadgets.toolbar ui.gadgets.scrollers
+ui.gadgets.borders ui.gadgets.status-bar ui.theme.images
+ui.tools.traceback ui.tools.inspector ui.tools.browser
+ui.tools.common ;
IN: ui.tools.debugger
TUPLE: debugger < track error restarts restart-hook restart-list continuation ;
assocs classes io io.styles arrays hashtables math.order sorting
refs fonts ui.tools.browser ui.commands ui.operations ui.gadgets
ui.gadgets.panes ui.gadgets.scrollers ui.gadgets.slots
-ui.gadgets.theme ui.gadgets.tracks ui.gestures
-ui.gadgets.buttons ui.gadgets.tables ui.theme ui.gadgets.toolbar
+ui.gadgets.tracks ui.gestures ui.gadgets.buttons
+ui.gadgets.tables ui.theme ui.gadgets.toolbar
ui.gadgets.status-bar ui.gadgets.labeled ui.tools.common ui
-combinators ui.gadgets.worlds ;
+combinators ui.gadgets.worlds ui.theme.images ;
IN: ui.tools.inspector
TUPLE: inspector-gadget < tool table ;
present sequences sets splitting tools.completion ui.commands
ui.gadgets ui.gadgets.editors ui.gadgets.glass
ui.gadgets.labeled ui.gadgets.scrollers ui.gadgets.tables
-ui.gadgets.theme ui.gadgets.tracks ui.gadgets.worlds
-ui.gadgets.wrappers ui.gestures ui.images ui.operations
-ui.pens.solid ui.theme ui.tools.common ui.tools.listener.history
+ui.gadgets.tracks ui.gadgets.worlds ui.gadgets.wrappers
+ui.gestures ui.images ui.operations ui.pens.solid ui.theme
+ui.theme.images ui.tools.common ui.tools.listener.history
ui.tools.listener.popups vocabs words ;
IN: ui.tools.listener.completion
tools.errors.model ui ui.commands ui.gadgets ui.gadgets.editors
ui.gadgets.glass ui.gadgets.labeled ui.gadgets.panes
ui.gadgets.scrollers ui.gadgets.status-bar ui.theme
-ui.gadgets.theme
ui.gadgets.toolbar ui.gadgets.tracks ui.gestures ui.operations
-ui.pens.solid ui.tools.browser ui.tools.common ui.tools.debugger
-ui.tools.error-list ui.tools.listener.completion
+ui.pens.solid ui.theme.images ui.tools.browser ui.tools.common
+ui.tools.debugger ui.tools.error-list ui.tools.listener.completion
ui.tools.listener.history ui.tools.listener.popups vocabs
vocabs.loader vocabs.parser vocabs.refresh words ;
IN: ui.tools.listener
ui.gadgets ui.gadgets.borders ui.gadgets.buttons
ui.gadgets.labeled ui.gadgets.panes ui.gadgets.scrollers
ui.gadgets.status-bar ui.gadgets.tables ui.gadgets.toolbar
-ui.theme ui.gadgets.theme ui.gadgets.tracks
-ui.gestures ui.tools.common ;
+ui.theme ui.gadgets.tracks ui.gestures ui.theme.images ui.tools.common ;
QUALIFIED-WITH: ui.tools.inspector i
IN: ui.tools.traceback