From 51a777d703a3e3eb723dd8878fcfbfda48922b47 Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Tue, 15 Mar 2016 12:14:30 +0100
Subject: Limit windows

---
 xmonad.symlink/xmonad.hs | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'xmonad.symlink/xmonad.hs')

diff --git a/xmonad.symlink/xmonad.hs b/xmonad.symlink/xmonad.hs
index a3aff47..43d0a9e 100644
--- a/xmonad.symlink/xmonad.hs
+++ b/xmonad.symlink/xmonad.hs
@@ -6,6 +6,7 @@ import XMonad.Actions.CycleWindows
 import XMonad.Hooks.SetWMName
 import XMonad.Hooks.DynamicLog
 import XMonad.Hooks.ManageDocks
+import XMonad.Layout.LimitWindows
 import XMonad.Layout.MultiColumns
 import XMonad.Layout.Tabbed
 import XMonad.Util.EZConfig
@@ -45,9 +46,11 @@ myKeys xmproc = [ ("M-<F5>", spawn "xbacklight -dec 5 -time 80")
          , ("M-S-p", spawn "passmenu -i")
          , ("M-v", spawn "uxterm -e vim")
          , ("M-m", spawn "uxterm -e cmus")
+         , ("M--", decreaseLimit)
+         , ("M-=", increaseLimit)
          ]
 
-myLayouts = Tall 1 0.01 0.5
+myLayouts = limitWindows 3 $ Tall 1 0.01 0.5
         ||| multiCol [1,1,0] 4 0.01 0.4
         ||| simpleTabbed
 
-- 
cgit v1.2.3