module Projects (
  Projects.modify
) where

import XMonad
import XMonad.Actions.DynamicProjects

projects :: [Project]
projects =  [ Project { projectName = "admin"
                      , projectDirectory = "~/admin"
                      , projectStartHook = Nothing
                      }
            , Project { projectName = "tootgun"
                      , projectDirectory = "~/candy/tootgun"
                      , projectStartHook = Nothing
                      }
            , Project { projectName = "steam"
                      , projectDirectory = "~/"
                      , projectStartHook = Just $ do spawn "steam"
                      }
           ]

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