aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSpencer Janssen <sjanssen@cse.unl.edu>2007-04-24 03:03:52 +0200
committerSpencer Janssen <sjanssen@cse.unl.edu>2007-04-24 03:03:52 +0200
commit0805c4527cce9c6ef5abca549f2a2800bacb892f (patch)
tree24a35e5fca5812f289412516c119e2404802569f
parenta94cf2318601048a99c6f0ae1860d3d07aab39d4 (diff)
downloadxmonad-0805c4527cce9c6ef5abca549f2a2800bacb892f.tar.gz
xmonad-0805c4527cce9c6ef5abca549f2a2800bacb892f.tar.xz
xmonad-0805c4527cce9c6ef5abca549f2a2800bacb892f.zip
Clear numlock bit
darcs-hash:20070424010352-a5988-411c7bc6d019f772b412e230cfc19aa06041ca7c.gz
-rw-r--r--Main.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Main.hs b/Main.hs
index 1c7eab1..aa541ce 100644
--- a/Main.hs
+++ b/Main.hs
@@ -128,7 +128,7 @@ handle (KeyEvent {ev_event_type = t, ev_state = m, ev_keycode = code})
| t == keyPress
= withDisplay $ \dpy -> do
s <- io $ keycodeToKeysym dpy code 0
- whenJust (M.lookup (m,s) keys) id
+ whenJust (M.lookup (complement numlockMask .&. m,s) keys) id
-- manage a new window
handle (MapRequestEvent {ev_window = w}) = withDisplay $ \dpy -> do