aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Operations.hs
diff options
context:
space:
mode:
authorAdam Vogt <vogt.adam@gmail.com>2010-01-18 17:22:56 +0100
committerAdam Vogt <vogt.adam@gmail.com>2010-01-18 17:22:56 +0100
commit39f9d5a9b446ad907063a830ee140d1c08c3306b (patch)
tree88a51ea5551ef367d2a2ed3657793248f15a0ba5 /XMonad/Operations.hs
parent660e5d4eb38ae58acb5e91e40124738df812b8b7 (diff)
downloadxmonad-39f9d5a9b446ad907063a830ee140d1c08c3306b.tar.gz
xmonad-39f9d5a9b446ad907063a830ee140d1c08c3306b.tar.xz
xmonad-39f9d5a9b446ad907063a830ee140d1c08c3306b.zip
Rename numlockMask to numberlockMask to help users of the template config.
Ignore-this: 4050ed2d1ad373386c2e2b44145f07d9 Without the change, the errors are like: > [ unrelated error messages ] > No constructor has all these fields: `numlockMask', > `terminal', [every other field set] With the change: > `numlockMask' is not a record selector > [ context where numlockMask is named ] darcs-hash:20100118162256-1499c-c473138c7c8589e7a40fa17675fd5cafe2dc4c11.gz
Diffstat (limited to '')
-rw-r--r--XMonad/Operations.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/XMonad/Operations.hs b/XMonad/Operations.hs
index 9614d47..d784951 100644
--- a/XMonad/Operations.hs
+++ b/XMonad/Operations.hs
@@ -388,13 +388,13 @@ isClient w = withWindowSet $ return . W.member w
-- (numlock and capslock)
extraModifiers :: X [KeyMask]
extraModifiers = do
- nlm <- gets numlockMask
+ nlm <- gets numberlockMask
return [0, nlm, lockMask, nlm .|. lockMask ]
-- | Strip numlock\/capslock from a mask
cleanMask :: KeyMask -> X KeyMask
cleanMask km = do
- nlm <- gets numlockMask
+ nlm <- gets numberlockMask
return (complement (nlm .|. lockMask) .&. km)
-- | Get the 'Pixel' value for a named color