aboutsummaryrefslogtreecommitdiffstats
path: root/Config.hs
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--Config.hs7
-rw-r--r--Config.hs-boot3
2 files changed, 7 insertions, 3 deletions
diff --git a/Config.hs b/Config.hs
index f70f0e5..98f30eb 100644
--- a/Config.hs
+++ b/Config.hs
@@ -141,3 +141,10 @@ keys = M.fromList $
[((m .|. modMask, key), screenWorkspace sc >>= f)
| (key, sc) <- zip [xK_w, xK_e, xK_r] [0..]
, (f, m) <- [(view, 0), (shift, shiftMask)]]
+
+mouseBindings :: M.Map (KeyMask, Button) (Window -> X ())
+mouseBindings = M.fromList $
+ [ ((modMask, button1), (\w -> focus w >> mouseMoveWindow w))
+ , ((modMask, button2), (\w -> focus w >> swapMaster))
+ , ((modMask, button3), (\w -> focus w >> mouseResizeWindow w))
+ ]
diff --git a/Config.hs-boot b/Config.hs-boot
index ca01d46..2d66ae1 100644
--- a/Config.hs-boot
+++ b/Config.hs-boot
@@ -1,6 +1,3 @@
module Config where
import Graphics.X11.Xlib.Types (Dimension)
-import Graphics.X11.Xlib (KeyMask)
borderWidth :: Dimension
-modMask :: KeyMask
-numlockMask :: KeyMask