workspace numbers need to be statically known because layouts are type-level

1 files changed, 1 insertions, 3 deletions

diff --git a/.xmonad/xmonad.hs b/.xmonad/xmonad.hs
index 8813651..e1ed49b 100644
--- a/.xmonad/xmonad.hs
+++ b/.xmonad/xmonad.hs
@@ -76,7 +76,7 @@ hostFromName h@("vali") = defaultHost { hName = h
                                                                              ]
                                       , hWsp = hWsp
                                       , hCoWsp = hCoWsp
-                                      , hLayoutMod = maybe' applyWeb
+                                      , hLayoutMod = onWorkspace (hWsp 1) (noBorders Full ||| tabbedLayout tabbedBottomAlways)
                                       , hKeysMod = \conf -> Map.union $ Map.fromList $ join $ map (spawnBindings conf) [ (xK_d, ["dwb", "dwb $(xclip -o)"])
                                                                                                                        ]
                                       }
@@ -85,8 +85,6 @@ hostFromName h@("vali") = defaultHost { hName = h
                                   ]
     hWsp = wspFromMap workspaceNames
     hCoWsp = coWspFromMap workspaceNames
-    maybe' = fromMaybe id
-    applyWeb = (\wsp -> onWorkspace wsp (noBorders Full ||| tabbedLayout tabbedBottomAlways)) <$> hCoWsp "web"
 hostFromName _ = defaultHost
 
 wspFromMap workspaceNames = \i -> case Map.lookup i workspaceNames of