diff options
Diffstat (limited to 'Commands.hs')
-rw-r--r-- | Commands.hs | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/Commands.hs b/Commands.hs index 216f1b2..1b7cac8 100644 --- a/Commands.hs +++ b/Commands.hs @@ -42,7 +42,7 @@ import Data.Maybe -- -- and add a keybinding to the runCommand action: -- --- > , ((modMask .|. controlMask, xK_y), runCommand) +-- > , ((modMask .|. controlMask, xK_y), runCommand commands) -- -- and define the list commands: -- @@ -54,6 +54,11 @@ import Data.Maybe -- 'commands'. (If you like it enough, you may even want to get rid -- of many of your other key bindings!) +-- %def commands :: [(String, X ())] +-- %def commands = defaultCommands +-- %import XMonadContrib.Commands +-- %keybind , ((modMask .|. controlMask, xK_y), runCommand commands) + commandMap :: [(String, X ())] -> M.Map String (X ()) commandMap c = M.fromList c |