aboutsummaryrefslogtreecommitdiffstats
path: root/Submap.hs
diff options
context:
space:
mode:
authorAlex Tarkovsky <alextarkovsky@gmail.com>2007-09-05 22:01:28 +0200
committerAlex Tarkovsky <alextarkovsky@gmail.com>2007-09-05 22:01:28 +0200
commita2ceae3cf6f302de2420f072238a29c9fbe8d974 (patch)
treebdd6ec53b679432c8a88a1cb60e4bc437b86a3dd /Submap.hs
parentbea7c7116f233a785e4c96a1d577ca2797fe70bf (diff)
downloadXMonadContrib-a2ceae3cf6f302de2420f072238a29c9fbe8d974.tar.gz
XMonadContrib-a2ceae3cf6f302de2420f072238a29c9fbe8d974.tar.xz
XMonadContrib-a2ceae3cf6f302de2420f072238a29c9fbe8d974.zip
Docstring parser for generating xmonad build configs with default settings for extensions
darcs-hash:20070905200128-bd4fb-ff90db3eb7ebce6ea75956f19ebc6c35d36c08d4.gz
Diffstat (limited to '')
-rw-r--r--Submap.hs8
1 files changed, 8 insertions, 0 deletions
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