xmonad-config/lib/Projects.hs

module Projects (
  Projects.modify
) where

import XMonad
import XMonad.Actions.DynamicProjects
import XMonad.Util.Run

projects :: [Project]
projects =  [ Project { projectName = "admin"
                      , projectDirectory = "~/admin"
                      , projectStartHook = Just $ do safeSpawn "vim" ["-g"]
                                                     safeSpawnProg "st"
                      }
            , Project { projectName = "sound"
                      , projectDirectory = "/tmp"
                      , projectStartHook = Just $ do safeSpawnProg "pavucontrol"
                      }
            , Project { projectName = "steam"
                      , projectDirectory = "~/"
                      , projectStartHook = Just $ do spawn "steam"
                      }
            , Project { projectName = "web"
                      , projectDirectory = "/tmp"
                      , projectStartHook = Just $ do spawn "firefox"
                      }
            , Project { projectName = "yt"
                      , projectDirectory = "/tmp"
                      , projectStartHook = Just $ do spawn "ytapp-launcher.sh"
                      }
            , Project { projectName = "Diablo"
                      , projectDirectory = "/tmp"
                      , projectStartHook = Just $ do spawn "/run/current-system/sw/bin/wine '/home/eeva/.wine/drive_c/Program Files/Battle.net/Battle.net Launcher.exe'"
                      }
           ]

modify :: XConfig l -> XConfig l
modify conf = dynamicProjects projects conf
  { workspaces = [] }