diff options
| author | Josh Rahm <joshuarahm@gmail.com> | 2022-04-12 02:04:18 -0600 |
|---|---|---|
| committer | Josh Rahm <joshuarahm@gmail.com> | 2022-10-09 12:19:46 -0600 |
| commit | 0eae9cfa1f500c304ab55e2ebeddc95cfcf74e56 (patch) | |
| tree | 2925f04e33fb10aafcb297f4a673db78c578fcb3 | |
| parent | 0a871fe0c0425d332675a8141ce1da427a572568 (diff) | |
| download | rde-0eae9cfa1f500c304ab55e2ebeddc95cfcf74e56.tar.gz rde-0eae9cfa1f500c304ab55e2ebeddc95cfcf74e56.tar.bz2 rde-0eae9cfa1f500c304ab55e2ebeddc95cfcf74e56.zip | |
Make spacing specific to the current layout rather than all layouts. Not sure how I feel about it, but Imma try it out
| -rw-r--r-- | src/Rahm/Desktop/Layout.hs | 5 |
1 files changed, 3 insertions, 2 deletions
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)) |: |