diff options
| author | Azat Bahawi <azahi@teknik.io> | 2021-12-02 10:46:40 +0300 |
|---|---|---|
| committer | Azat Bahawi <azahi@teknik.io> | 2021-12-02 10:46:40 +0300 |
| commit | 1be0f7aee9a571b4b0694136758df53b63c6f915 (patch) | |
| tree | 3817e90e0b4cdf6b24d8e9faac7579fe620f0c6b /src/lib/XMonad/Custom/Workspaces.hs | |
| parent | Update HIE (diff) | |
Some stuff
Diffstat (limited to '')
| -rw-r--r-- | src/lib/XMonad/Custom/Workspaces.hs | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/src/lib/XMonad/Custom/Workspaces.hs b/src/lib/XMonad/Custom/Workspaces.hs index ba2a1e7..43d8aa2 100644 --- a/src/lib/XMonad/Custom/Workspaces.hs +++ b/src/lib/XMonad/Custom/Workspaces.hs @@ -9,10 +9,11 @@ -- module XMonad.Custom.Workspaces - ( workspaces + ( myWorkspaces ) where -import XMonad.Core hiding ( workspaces ) +import XMonad.Core +import XMonad.Layout.IndependentScreens -workspaces :: [WorkspaceId] -workspaces = map show [1 .. 9 :: Int] +myWorkspaces :: ScreenId -> [PhysicalWorkspace] +myWorkspaces = flip withScreens $ map show [1 .. 9 :: Int] |