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" } , 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 = [] }