From a2ceae3cf6f302de2420f072238a29c9fbe8d974 Mon Sep 17 00:00:00 2001
From: Alex Tarkovsky <alextarkovsky@gmail.com>
Date: Wed, 5 Sep 2007 22:01:28 +0200
Subject: Docstring parser for generating xmonad build configs with default
 settings for extensions

darcs-hash:20070905200128-bd4fb-ff90db3eb7ebce6ea75956f19ebc6c35d36c08d4.gz
---
 Submap.hs | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'Submap.hs')

diff --git a/Submap.hs b/Submap.hs
index 0dee401..4d655ef 100644
--- a/Submap.hs
+++ b/Submap.hs
@@ -43,6 +43,14 @@ anyModifier will not work, because that is a special value passed to XGrabKey()
 and not an actual modifier.
 -}
 
+-- %import XMonadContrib.Submap
+-- %keybind , ((modMask, xK_a), submap . M.fromList $
+-- %keybind     [ ((0, xK_n),     spawn "mpc next")
+-- %keybind     , ((0, xK_p),     spawn "mpc prev")
+-- %keybind     , ((0, xK_z),     spawn "mpc random")
+-- %keybind     , ((0, xK_space), spawn "mpc toggle")
+-- %keybind     ])
+
 submap :: M.Map (KeyMask, KeySym) (X ()) -> X ()
 submap keys = do
     XConf { theRoot = root, display = d } <- ask
-- 
cgit v1.2.3