From b91ef705458b42d4d3693d9597317edb8fe512bf Mon Sep 17 00:00:00 2001
From: "Valery V. Vorotyntsev" <valery.vv@gmail.com>
Date: Thu, 15 Nov 2007 16:14:10 +0100
Subject: 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
---
 XMonad/Util/CustomKeys.hs | 13 +++++++++++++
 1 file changed, 13 insertions(+)

(limited to 'XMonad')

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.
-- 
cgit v1.2.3