ui.backend.x11.keys: symbolic constants can be used

char-rename
Björn Lindqvist 2016-08-17 04:04:06 +02:00
parent 1c3f345396
commit f8e781ee17
1 changed files with 6 additions and 5 deletions

View File

@ -1,14 +1,15 @@
! Copyright (C) 2016 Björn Lindqvist ! Copyright (C) 2016 Björn Lindqvist
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: accessors assocs kernel literals ui.gestures x11.keysymdef ; USING: accessors assocs kernel literals ui.gestures x11.X
x11.keysymdef ;
IN: ui.backend.x11.keys IN: ui.backend.x11.keys
CONSTANT: modifiers CONSTANT: modifiers
{ {
{ S+ 0x1 } ${ S+ ShiftMask }
{ C+ 0x4 } ${ C+ ControlMask }
{ A+ 0x8 } ${ A+ Mod1Mask }
{ M+ 0x40 } ${ M+ Mod4Mask }
} }
CONSTANT: codes CONSTANT: codes