From e846674a2f819c85665701136ab57a00b4afb05e Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Mon, 11 Sep 2017 17:06:27 -0500 Subject: [PATCH] basis: Fix load errors. --- basis/ui/backend/gtk/gtk.factor | 3 ++- basis/ui/backend/x11/keys/keys.factor | 7 +++---- 2 files changed, 5 insertions(+), 5 deletions(-) diff --git a/basis/ui/backend/gtk/gtk.factor b/basis/ui/backend/gtk/gtk.factor index 308068deb9..3c591b3172 100644 --- a/basis/ui/backend/gtk/gtk.factor +++ b/basis/ui/backend/gtk/gtk.factor @@ -9,7 +9,8 @@ math.vectors namespaces sequences strings system threads ui ui.backend ui.backend.gtk.input-methods ui.backend.gtk.io ui.backend.x11.keys ui.clipboards ui.event-loop ui.gadgets ui.gadgets.private ui.gadgets.worlds ui.gestures ui.pixel-formats -ui.pixel-formats.private ui.private vocabs.loader ; +ui.pixel-formats.private ui.private vocabs.loader +combinators.smart.syntax ; IN: ui.backend.gtk SINGLETON: gtk-ui-backend diff --git a/basis/ui/backend/x11/keys/keys.factor b/basis/ui/backend/x11/keys/keys.factor index e35f53c139..6ea5ae9ffb 100644 --- a/basis/ui/backend/x11/keys/keys.factor +++ b/basis/ui/backend/x11/keys/keys.factor @@ -1,16 +1,15 @@ ! Copyright (C) 2016 Björn Lindqvist ! See http://factorcode.org/license.txt for BSD license. USING: accessors assocs kernel literals ui.gestures x11.X -x11.keysymdef ; +x11.keysymdef combinators.smart.syntax ; IN: ui.backend.x11.keys -CONSTANT: modifiers - { +CONSTANT: modifiers { array[ ShiftMask ] array[ ControlMask ] array[ Mod1Mask ] array[ Mod4Mask ] - ] + } CONSTANT: codes H{