From 284d44eebcd005485d0cae0fc0b751878fd9fd90 Mon Sep 17 00:00:00 2001
From: Dmitriy Pleshevskiy <dmitriy@ideascup.me>
Date: Fri, 21 Oct 2022 03:21:14 +0300
Subject: [PATCH] users/xmonad: fixup syntax

---
 users/modules/window_manager/xmonad_config.hs | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/users/modules/window_manager/xmonad_config.hs b/users/modules/window_manager/xmonad_config.hs
index 3a4dc29..f66d63c 100644
--- a/users/modules/window_manager/xmonad_config.hs
+++ b/users/modules/window_manager/xmonad_config.hs
@@ -50,7 +50,7 @@ import XMonad.Util.Run
 -- The preferred terminal program, which is used in a binding below and by
 -- certain contrib modules.
 --
-myTerminal = "alacritty"
+myTerminal = "alacritty msg create-window"
 
 -- Whether focus follows the mouse pointer.
 myFocusFollowsMouse = False
@@ -252,7 +252,7 @@ myManageHook = manageApps
             [ className =? "nheko",
               className =? "KotatogramDesktop"
             ]
-            -?> doShift comWs
+            -?> doShift comWs,
           -- general
           anyOf
             [ resource =? "desktop_window",
@@ -409,7 +409,7 @@ myProjects =
     Project
       { projectName = "dexios",
         projectStartHook = replicateM_ 2 $ spawn $ terminal "~/repos/dexios"
-      },
+      }
   ]
   where
     terminal :: String -> String
@@ -417,7 +417,7 @@ myProjects =
 
     terminal' :: String -> Maybe String -> String
     terminal' wd' cmd' =
-      "alacritty" ++ workdir ++ command
+      myTerminal ++ workdir ++ command
       where
         workdir = " --working-directory " ++ wd'
         command = case cmd' of