From 4dc47976f3faf972cd2d5a0b57ea2ace61b532a5 Mon Sep 17 00:00:00 2001
From: Josh Rahm <rahm@google.com>
Date: Sat, 9 Oct 2021 00:06:21 -0600
Subject: Set alacritty to be default terminal and avoid struts

---
 src/Internal/Layout.hs | 3 ++-
 src/Main.hs            | 3 +--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/Internal/Layout.hs b/src/Internal/Layout.hs
index 3fae26d..c54ffa7 100644
--- a/src/Internal/Layout.hs
+++ b/src/Internal/Layout.hs
@@ -1,6 +1,7 @@
 {-# LANGUAGE MultiParamTypeClasses, FlexibleInstances #-}
 module Internal.Layout where 
 
+import XMonad.Hooks.ManageDocks
 import XMonad.Layout.Circle
 import XMonad.Layout.Accordion
 import Control.Applicative
@@ -18,7 +19,7 @@ import qualified XMonad.StackSet as W
 
 myLayout =
   ModifiedLayout (Zoomable False 0.05 0.05) $
-    spacingRaw True (Border 5 5 5 5) True (Border 5 5 5 5) True $
+    spacingRaw True (Border 5 5 5 5) True (Border 5 5 5 5) True $ avoidStruts $
       spiral (6/7) |||
       Tall 1 (3/100) (1/2) |||
       ThreeCol 1 (3/100) (1/2) |||
diff --git a/src/Main.hs b/src/Main.hs
index 1d07ef8..d4f5dae 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -21,11 +21,10 @@ main = do
   -- Execute some commands.
   homeDir <- getHomeDirectory
   let fp = homeDir </> ".xmonad" </> "startup"
-  let theLayout = myLayout
 
   config <-
     applyKeys $ def
-       { terminal    = "sakura"
+       { terminal    = "alacritty"
        , modMask     = mod4Mask
        , borderWidth = 2
        , keys = \config -> mempty
-- 
cgit