users/xmonad: fixup syntax

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