diff options
author | Adam Vogt <vogt.adam@gmail.com> | 2010-01-24 21:19:55 +0100 |
---|---|---|
committer | Adam Vogt <vogt.adam@gmail.com> | 2010-01-24 21:19:55 +0100 |
commit | 292a0379923bdc24fb65f46138681d839e7aa063 (patch) | |
tree | 215fec25ccd10adaa7df94578222635c178203a9 | |
parent | ef7cd124086bd3c91eb5fea9bb13057a82c71f29 (diff) | |
download | XMonadContrib-292a0379923bdc24fb65f46138681d839e7aa063.tar.gz XMonadContrib-292a0379923bdc24fb65f46138681d839e7aa063.tar.xz XMonadContrib-292a0379923bdc24fb65f46138681d839e7aa063.zip |
Compatibility for rename of XMonad.numlockMask
Ignore-this: 765c58a8b77ca0b54f05fd69a9bba714
darcs-hash:20100124201955-1499c-2df148dc43f0fd6506c0e70a7bce268b22ab8665.gz
-rw-r--r-- | XMonad/Prompt.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/XMonad/Prompt.hs b/XMonad/Prompt.hs index 850e0c7..22154ed 100644 --- a/XMonad/Prompt.hs +++ b/XMonad/Prompt.hs @@ -67,8 +67,8 @@ module XMonad.Prompt import Prelude hiding (catch) -import XMonad hiding (config, numlockMask, cleanMask) -import qualified XMonad as X (numlockMask) +import XMonad hiding (config, cleanMask) +import qualified XMonad as X (numberlockMask) import qualified XMonad.StackSet as W import XMonad.Util.Font import XMonad.Util.Types @@ -284,7 +284,7 @@ mkXPromptWithReturn t conf compl action = do gc <- io $ createGC d w io $ setGraphicsExposures d gc False fs <- initXMF (font conf) - numlock <- gets $ X.numlockMask + numlock <- gets $ X.numberlockMask let hs = fromMaybe [] $ M.lookup (showXPrompt t) hist st = initState d rw w s compl gc fs (XPT t) hs conf numlock st' <- io $ execStateT runXP st |