From fd3d735ab9cec794597706540b9df3f63f7686fc Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Maximilian=20Ke=C3=9Fler?= <git@maximilian-kessler.de>
Date: Mon, 18 Jul 2022 18:56:54 +0200
Subject: [PATCH] restart xmonad: compile with stack beforehand

---
 src/XMonad/Custom/BasicKeyBindings.hs | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/XMonad/Custom/BasicKeyBindings.hs b/src/XMonad/Custom/BasicKeyBindings.hs
index d0733d1..6a159e0 100644
--- a/src/XMonad/Custom/BasicKeyBindings.hs
+++ b/src/XMonad/Custom/BasicKeyBindings.hs
@@ -60,5 +60,8 @@ myXMonadBindings = [
     ("S-q", quitXMonad)
   ]
     where
-      restartXMonad = spawn "if type xmonad; then xmonad --recompile && xmonad --restart; else xmessage xmonad not in \\$PATH: \"$PATH\"; fi"
       quitXMonad    = io exitSuccess
+
+
+restartXMonad :: X ()
+restartXMonad = spawn "if type xmonad; then cd ~/.config/xmonad; stack install; xmonad --recompile && xmonad --restart; else xmessage xmonad not in \\$PATH: \"$PATH\"; fi"