diff options
Diffstat (limited to '')
-rw-r--r-- | Config.hs | 7 | ||||
-rw-r--r-- | Config.hs-boot | 3 |
2 files changed, 7 insertions, 3 deletions
@@ -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 |