From 609cce956dc5e76f66107df647eef13ff5f5d194 Mon Sep 17 00:00:00 2001
From: Astrid Yu <astrid@astrid.tech>
Date: Sat, 24 Feb 2024 10:49:29 -0800
Subject: [PATCH] xmonad: Make fullscreen actually fullscreen

---
 nix/home-manager/astral/gui/xmonad/xmonad.hs | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/nix/home-manager/astral/gui/xmonad/xmonad.hs b/nix/home-manager/astral/gui/xmonad/xmonad.hs
index f1e0c109..1d4a971b 100644
--- a/nix/home-manager/astral/gui/xmonad/xmonad.hs
+++ b/nix/home-manager/astral/gui/xmonad/xmonad.hs
@@ -50,9 +50,10 @@ main = do
 xdisplays :: X [Rectangle]
 xdisplays = withDisplay $ io . getScreenInfo
 
-myLayoutHook = spacingWithEdge 10 $ avoidStruts $ layouts
+myLayoutHook = (spacingWithEdge 10 $ avoidStruts standardLayouts) ||| fullscreenLayout
     where
-        layouts = masterLeft ||| masterRight ||| masterTop ||| (smartBorders $ (fullscreenFloat . fullscreenFull) Full)
+        standardLayouts = masterLeft ||| masterRight ||| masterTop
+        fullscreenLayout = noBorders $ (fullscreenFloat . fullscreenFull) Full
         masterLeft = Tall nmaster delta ratio
         masterRight = reflectHoriz masterLeft
         masterTop = Mirror masterLeft