From 0eae9cfa1f500c304ab55e2ebeddc95cfcf74e56 Mon Sep 17 00:00:00 2001
From: Josh Rahm <joshuarahm@gmail.com>
Date: Tue, 12 Apr 2022 02:04:18 -0600
Subject: Make spacing specific to the current layout rather than all layouts.
 Not sure how I feel about it, but Imma try it out

---
 src/Rahm/Desktop/Layout.hs | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'src/Rahm/Desktop/Layout.hs')

diff --git a/src/Rahm/Desktop/Layout.hs b/src/Rahm/Desktop/Layout.hs
index 906a7fc..fcf7d25 100644
--- a/src/Rahm/Desktop/Layout.hs
+++ b/src/Rahm/Desktop/Layout.hs
@@ -37,12 +37,13 @@ import Rahm.Desktop.Layout.Hole
 import qualified Data.Map as M
 import qualified XMonad.StackSet as W
 
-mods = reinterpretResize . poppable . flippable . rotateable . hole
+withSpacing = spacingRaw True (Border 5 5 5 5) True (Border 5 5 5 5) True
+mods =
+  withSpacing . reinterpretResize . poppable . flippable . rotateable . hole
 
 myLayout =
   fullscreenFull $
     avoidStruts $
-      spacingRaw True (Border 5 5 5 5) True (Border 5 5 5 5) True $
         layoutZipper $
           mods (reinterpretIncMaster $ spiral (6/7)) |:
           mods (modifyMosaic (MosaicAlt M.empty :: MosaicAlt Window)) |:
-- 
cgit