diff options
author | Andrea Rossato <andrea.rossato@unibz.it> | 2007-06-13 21:09:08 +0200 |
---|---|---|
committer | Andrea Rossato <andrea.rossato@unibz.it> | 2007-06-13 21:09:08 +0200 |
commit | 814b27276d78c056c112aef5c52ba463c9eb0383 (patch) | |
tree | 2c98b8a7773d5885b400010371c63f9f9d7cba67 /Commands.hs | |
parent | de54c680f5cfb3161efcdf787f198334434dafd6 (diff) | |
download | XMonadContrib-814b27276d78c056c112aef5c52ba463c9eb0383.tar.gz XMonadContrib-814b27276d78c056c112aef5c52ba463c9eb0383.tar.xz XMonadContrib-814b27276d78c056c112aef5c52ba463c9eb0383.zip |
added info to Commands.hs
Haddock stuff.
darcs-hash:20070613190908-32816-e64687cb5102b479a97da7897d26406366f76c0f.gz
Diffstat (limited to '')
-rw-r--r-- | Commands.hs | 45 |
1 files changed, 27 insertions, 18 deletions
diff --git a/Commands.hs b/Commands.hs index e9b5452..03aec49 100644 --- a/Commands.hs +++ b/Commands.hs @@ -2,50 +2,59 @@ -- | -- Module : XMonadContrib.Commands -- Copyright : (c) David Glasser 2007 +-- License : BSD3 -- -- Maintainer : glasser@mit.edu -- Stability : stable -- Portability : portable -- ------------------------------------------------------------------------------ --- -- Allows you to run internal xmonad commands (X () actions) using -- a dmenu menu in addition to key bindings. Requires dmenu and -- the Dmenu XMonadContrib module. -- +----------------------------------------------------------------------------- + +module XMonadContrib.Commands ( + -- * Usage + -- $usage + runCommand, + defaultCommands + ) where + +import XMonad +import Operations +import {-# SOURCE #-} Config (workspaces, commands) +import XMonadContrib.Dmenu (dmenu) + +import qualified Data.Map as M +import System.Exit +import Data.Maybe + +-- $usage +-- -- To use, modify your Config.hs to: -- --- import XMonadContrib.Commands +-- > import XMonadContrib.Commands -- -- and add a keybinding to the runCommand action: -- --- , ((modMask .|. controlMask, xK_y), runCommand) +-- > , ((modMask .|. controlMask, xK_y), runCommand) -- -- and define the list commands: -- --- commands = defaultCommands +-- > commands = defaultCommands -- -- Finally, add the following lines to Config.hs-boot: -- --- import XMonad (X) --- workspaces :: Int --- commands :: [(String, X ())] +-- > import XMonad (X) +-- > workspaces :: Int +-- > commands :: [(String, X ())] -- -- A popup menu of internal xmonad commands will appear. You can -- change the commands by changing the contents of the list -- 'commands'. (If you like it enough, you may even want to get rid -- of many of your other key bindings!) -module XMonadContrib.Commands where - -import XMonad -import Operations -import {-# SOURCE #-} Config (workspaces, commands) -import XMonadContrib.Dmenu (dmenu) - -import qualified Data.Map as M -import System.Exit -import Data.Maybe commandMap :: M.Map String (X ()) commandMap = M.fromList commands |