diff options
author | Valery V. Vorotyntsev <valery.vv@gmail.com> | 2007-11-15 16:14:10 +0100 |
---|---|---|
committer | Valery V. Vorotyntsev <valery.vv@gmail.com> | 2007-11-15 16:14:10 +0100 |
commit | b91ef705458b42d4d3693d9597317edb8fe512bf (patch) | |
tree | 2dacb247b2f20cee20f9d4f8324858244348e0c2 /XMonad | |
parent | 36401011efec80ef8da9ed4eef7cd65070026afe (diff) | |
download | XMonadContrib-b91ef705458b42d4d3693d9597317edb8fe512bf.tar.gz XMonadContrib-b91ef705458b42d4d3693d9597317edb8fe512bf.tar.xz XMonadContrib-b91ef705458b42d4d3693d9597317edb8fe512bf.zip |
CustomKeys.hs: "complete rebinding" mechanism explained
Thanks to Don Stewart for his suggestion:
http://article.gmane.org/gmane.comp.lang.haskell.xmonad/3339
darcs-hash:20071115151410-ae588-04948de32e45d0a0602c26740b25f59dbac95426.gz
Diffstat (limited to 'XMonad')
-rw-r--r-- | XMonad/Util/CustomKeys.hs | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/XMonad/Util/CustomKeys.hs b/XMonad/Util/CustomKeys.hs index 7c7a239..cab66d8 100644 --- a/XMonad/Util/CustomKeys.hs +++ b/XMonad/Util/CustomKeys.hs @@ -46,6 +46,19 @@ import qualified Data.Map as M -- > , ((mod1Mask, xK_Down), spawn "amixer set Master 1-") -- > , ((mod1Mask, xK_Up ), spawn "amixer set Master 1+") -- > ] +-- +-- 0 (/hidden feature/). You can always replace bindings map +-- entirely. No need to import "CustomKeys" this time: +-- +-- > import XMonad +-- > import Graphics.X11.Xlib +-- > import System.Exit +-- > import qualified Data.Map as M +-- > +-- > main = xmonad defaultConfig { +-- > keys = \_ -> M.fromList [ +-- > -- Let me out of here! I want my KDE back! Help! Help! +-- > ( (0, xK_Escape), io (exitWith ExitSuccess) ) ] } -- | Customize 'XMonad.Config.defaultConfig' -- delete needless -- shortcuts and insert those you will use. |