diff options
author | Jason Creighton <jcreigh@gmail.com> | 2007-06-01 03:51:37 +0200 |
---|---|---|
committer | Jason Creighton <jcreigh@gmail.com> | 2007-06-01 03:51:37 +0200 |
commit | dba1257bd521925f5e6524f1b49468beae5ea87a (patch) | |
tree | b3fdcc5997eab31b4c73299027a5b609666569bc /Main.hs | |
parent | 473dafebcd0c24b10a94c977b18e424ffca36543 (diff) | |
download | metatile-dba1257bd521925f5e6524f1b49468beae5ea87a.tar metatile-dba1257bd521925f5e6524f1b49468beae5ea87a.zip |
ignore numlock/capslock on mouse bindings
darcs-hash:20070601015137-b9aa7-51c6b9ec428c2d16d65b196384fa2ce953dda245
Diffstat (limited to 'Main.hs')
-rw-r--r-- | Main.hs | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -106,8 +106,7 @@ grabKeys dpy rootw = do kc <- keysymToKeycode dpy sym -- "If the specified KeySym is not defined for any KeyCode, -- XKeysymToKeycode() returns zero." - when (kc /= '\0') $ mapM_ (grab kc . (mask .|.)) $ - [0, numlockMask, lockMask, numlockMask .|. lockMask] + when (kc /= '\0') $ mapM_ (grab kc . (mask .|.)) extraModifiers where grab kc m = grabKey dpy kc m rootw True grabModeAsync grabModeAsync |