Fix X11 UI

db4
slava 2008-04-05 19:15:35 -05:00
parent 871831fdae
commit 1f838811e8
1 changed files with 3 additions and 2 deletions

View File

@ -4,8 +4,9 @@ USING: alien alien.c-types arrays ui ui.gadgets ui.gestures
ui.backend ui.clipboards ui.gadgets.worlds assocs kernel math ui.backend ui.clipboards ui.gadgets.worlds assocs kernel math
namespaces opengl sequences strings x11.xlib x11.events x11.xim namespaces opengl sequences strings x11.xlib x11.events x11.xim
x11.glx x11.clipboard x11.constants x11.windows io.encodings.string x11.glx x11.clipboard x11.constants x11.windows io.encodings.string
io.encodings.utf8 combinators debugger system command-line io.encodings.utf8 combinators debugger command-line qualified
ui.render math.vectors classes.tuple opengl.gl threads ; ui.render math.vectors classes.tuple opengl.gl threads ;
QUALIFIED: system
IN: ui.x11 IN: ui.x11
SINGLETON: x11-ui-backend SINGLETON: x11-ui-backend
@ -261,5 +262,5 @@ M: x11-ui-backend ui ( -- )
x11-ui-backend ui-backend set-global x11-ui-backend ui-backend set-global
[ "DISPLAY" os-env "ui" "listener" ? ] [ "DISPLAY" system:os-env "ui" "listener" ? ]
main-vocab-hook set-global main-vocab-hook set-global