src/lib/XMonad/Custom/Projects.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33

-- |
-- Module                  : XMonad.Custom.Projects
-- Description             : Per-project workspaces
-- Copyright               : (c) Azat Bahawi 2018-2021
-- SPDX-License-Identifier : GPL-3.0-or-later
-- Maintainer              : azahi@teknik.io
-- Stability               : experimental
-- Portability             : non-portable
--

module XMonad.Custom.Projects
  ( projects
  ) where

import           XMonad.Actions.DynamicProjects
import           XMonad.Actions.SpawnOn
import qualified XMonad.Custom.Misc            as C

projects :: [Project]
projects =
  [ Project { projectName      = "Template"
            , projectDirectory = "~/"
            , projectStartHook = Nothing
            }
  , Project { projectName      = "Emacs"
            , projectDirectory = "~/"
            , projectStartHook = Just $ spawnOn "Emacs" "emacsclient"
            }
  , Project { projectName      = "WWW"
            , projectDirectory = "~/"
            , projectStartHook = Just $ spawnOn "WWW" (C.browser C.applications)
            }
  ]