diff --git a/.xmonad/README.org b/.xmonad/README.org index b798e7d..93d3b9d 100644 --- a/.xmonad/README.org +++ b/.xmonad/README.org @@ -252,6 +252,7 @@ mySpacing' i = spacingRaw True (Border i i i i) True (Border i i i i) True -- mySpacing n sets the gap size around the windows. tall = renamed [Replace "tall"] $ windowNavigation + $ smartBorders $ addTabs shrinkText myTabTheme $ subLayout [] (smartBorders Simplest) $ limitWindows 12 @@ -259,6 +260,7 @@ tall = renamed [Replace "tall"] $ ResizableTall 1 (3/100) (1/2) [] magnify = renamed [Replace "magnify"] $ windowNavigation + $ smartBorders $ addTabs shrinkText myTabTheme $ subLayout [] (smartBorders Simplest) $ magnifier @@ -267,16 +269,19 @@ magnify = renamed [Replace "magnify"] $ ResizableTall 1 (3/100) (1/2) [] monocle = renamed [Replace "monocle"] $ windowNavigation + $ smartBorders $ addTabs shrinkText myTabTheme $ subLayout [] (smartBorders Simplest) $ limitWindows 20 Full floats = renamed [Replace "floats"] $ windowNavigation + $ smartBorders $ addTabs shrinkText myTabTheme $ subLayout [] (smartBorders Simplest) $ limitWindows 20 simplestFloat grid = renamed [Replace "grid"] $ windowNavigation + $ smartBorders $ addTabs shrinkText myTabTheme $ subLayout [] (smartBorders Simplest) $ limitWindows 12 @@ -285,18 +290,21 @@ grid = renamed [Replace "grid"] $ Grid (16/10) spirals = renamed [Replace "spirals"] $ windowNavigation + $ smartBorders $ addTabs shrinkText myTabTheme $ subLayout [] (smartBorders Simplest) $ mySpacing' 8 $ spiral (6/7) threeCol = renamed [Replace "threeCol"] $ windowNavigation + $ smartBorders $ addTabs shrinkText myTabTheme $ subLayout [] (smartBorders Simplest) $ limitWindows 7 $ ThreeCol 1 (3/100) (1/2) threeRow = renamed [Replace "threeRow"] $ windowNavigation + $ smartBorders $ addTabs shrinkText myTabTheme $ subLayout [] (smartBorders Simplest) $ limitWindows 7 @@ -471,9 +479,9 @@ myKeys = , ("M-", sendMessage NextLayout) -- Switch to next layout , ("M-C-M1-", sendMessage Arrange) , ("M-C-M1-", sendMessage DeArrange) - , ("M-", sendMessage (MT.Toggle NBFULL) >> sendMessage ToggleStruts) -- Toggles noborder/full , ("M-S-", sendMessage ToggleStruts) -- Toggles struts , ("M-S-n", sendMessage $ MT.Toggle NOBORDERS) -- Toggles noborder + , ("", sendMessage (MT.Toggle NBFULL) >> sendMessage ToggleStruts) -- Toggles noborder/full -- Increase/decrease windows in the master pane or the stack , ("M-S-", sendMessage (IncMasterN 1)) -- Increase number of clients in master pane diff --git a/.xmonad/xmonad.hs b/.xmonad/xmonad.hs index 95d0e44..28e070b 100644 --- a/.xmonad/xmonad.hs +++ b/.xmonad/xmonad.hs @@ -192,6 +192,7 @@ mySpacing' i = spacingRaw True (Border i i i i) True (Border i i i i) True -- mySpacing n sets the gap size around the windows. tall = renamed [Replace "tall"] $ windowNavigation + $ smartBorders $ addTabs shrinkText myTabTheme $ subLayout [] (smartBorders Simplest) $ limitWindows 12 @@ -199,6 +200,7 @@ tall = renamed [Replace "tall"] $ ResizableTall 1 (3/100) (1/2) [] magnify = renamed [Replace "magnify"] $ windowNavigation + $ smartBorders $ addTabs shrinkText myTabTheme $ subLayout [] (smartBorders Simplest) $ magnifier @@ -207,16 +209,19 @@ magnify = renamed [Replace "magnify"] $ ResizableTall 1 (3/100) (1/2) [] monocle = renamed [Replace "monocle"] $ windowNavigation + $ smartBorders $ addTabs shrinkText myTabTheme $ subLayout [] (smartBorders Simplest) $ limitWindows 20 Full floats = renamed [Replace "floats"] $ windowNavigation + $ smartBorders $ addTabs shrinkText myTabTheme $ subLayout [] (smartBorders Simplest) $ limitWindows 20 simplestFloat grid = renamed [Replace "grid"] $ windowNavigation + $ smartBorders $ addTabs shrinkText myTabTheme $ subLayout [] (smartBorders Simplest) $ limitWindows 12 @@ -225,18 +230,21 @@ grid = renamed [Replace "grid"] $ Grid (16/10) spirals = renamed [Replace "spirals"] $ windowNavigation + $ smartBorders $ addTabs shrinkText myTabTheme $ subLayout [] (smartBorders Simplest) $ mySpacing' 8 $ spiral (6/7) threeCol = renamed [Replace "threeCol"] $ windowNavigation + $ smartBorders $ addTabs shrinkText myTabTheme $ subLayout [] (smartBorders Simplest) $ limitWindows 7 $ ThreeCol 1 (3/100) (1/2) threeRow = renamed [Replace "threeRow"] $ windowNavigation + $ smartBorders $ addTabs shrinkText myTabTheme $ subLayout [] (smartBorders Simplest) $ limitWindows 7 @@ -371,9 +379,9 @@ myKeys = , ("M-", sendMessage NextLayout) -- Switch to next layout , ("M-C-M1-", sendMessage Arrange) , ("M-C-M1-", sendMessage DeArrange) - , ("M-", sendMessage (MT.Toggle NBFULL) >> sendMessage ToggleStruts) -- Toggles noborder/full , ("M-S-", sendMessage ToggleStruts) -- Toggles struts , ("M-S-n", sendMessage $ MT.Toggle NOBORDERS) -- Toggles noborder + , ("", sendMessage (MT.Toggle NBFULL) >> sendMessage ToggleStruts) -- Toggles noborder/full -- Increase/decrease windows in the master pane or the stack , ("M-S-", sendMessage (IncMasterN 1)) -- Increase number of clients in master pane