From 3cd06b22069c009b8c5fea2d5fad5f996667d2e3 Mon Sep 17 00:00:00 2001 From: Azat Bahawi Date: Tue, 16 Aug 2022 01:46:04 +0300 Subject: huge update-o --- src/lib/XMonad/Custom/Workspaces.hs | 15 +++++++++------ 1 file changed, 9 insertions(+), 6 deletions(-) (limited to 'src/lib/XMonad/Custom/Workspaces.hs') diff --git a/src/lib/XMonad/Custom/Workspaces.hs b/src/lib/XMonad/Custom/Workspaces.hs index 43d8aa2..995fb9f 100644 --- a/src/lib/XMonad/Custom/Workspaces.hs +++ b/src/lib/XMonad/Custom/Workspaces.hs @@ -1,19 +1,22 @@ -- | -- Module : XMonad.Custom.Workspaces -- Description : General workspace configuration --- Copyright : (c) Azat Bahawi 2018-2021 +-- Copyright : (c) Azat Bahawi 2018-2022 -- SPDX-License-Identifier : GPL-3.0-or-later --- Maintainer : azahi@teknik.io +-- Maintainer : azat@bahawi.net -- Stability : experimental -- Portability : non-portable -- module XMonad.Custom.Workspaces - ( myWorkspaces + ( ngWorkspaces ) where -import XMonad.Core +import XMonad.Core ( ScreenId ) import XMonad.Layout.IndependentScreens + ( PhysicalWorkspace + , withScreens + ) -myWorkspaces :: ScreenId -> [PhysicalWorkspace] -myWorkspaces = flip withScreens $ map show [1 .. 9 :: Int] +ngWorkspaces :: ScreenId -> [PhysicalWorkspace] +ngWorkspaces = flip withScreens $ map show [1 .. 9 :: Int] -- cgit 1.4.1