diff options
| author | Adam Vogt <vogt.adam@gmail.com> | 2010-01-18 17:22:56 +0100 |
|---|---|---|
| committer | Adam Vogt <vogt.adam@gmail.com> | 2010-01-18 17:22:56 +0100 |
| commit | f166d6e947a048812b5d7198def7dc6f57288042 (patch) | |
| tree | 88a51ea5551ef367d2a2ed3657793248f15a0ba5 /XMonad/Main.hsc | |
| parent | ea1566b787bca0766233d0d300658d2acd8a2b9d (diff) | |
| download | metatile-f166d6e947a048812b5d7198def7dc6f57288042.tar metatile-f166d6e947a048812b5d7198def7dc6f57288042.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
Diffstat (limited to 'XMonad/Main.hsc')
| -rw-r--r-- | XMonad/Main.hsc | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/XMonad/Main.hsc b/XMonad/Main.hsc index d2cddf2..7358a36 100644 --- a/XMonad/Main.hsc +++ b/XMonad/Main.hsc @@ -121,7 +121,7 @@ xmonad initxmc = do st = XState { windowset = initialWinset - , numlockMask = 0 + , numberlockMask = 0 , mapped = S.empty , waitingUnmap = M.empty , dragging = Nothing @@ -338,7 +338,7 @@ setNumlockMask = do then return (setBit 0 (fromIntegral m)) else return (0 :: KeyMask) | (m, kcs) <- ms, kc <- kcs, kc /= 0] - modify (\s -> s { numlockMask = foldr (.|.) 0 xs }) + modify (\s -> s { numberlockMask = foldr (.|.) 0 xs }) -- | Grab the keys back grabKeys :: X () |