some fixes

This commit is contained in:
EEva 2021-10-05 23:40:55 +03:00
parent 11fb80639d
commit 37c58fbd2c
2 changed files with 16 additions and 21 deletions

View File

@ -23,36 +23,30 @@ singleTermAppWithName name app = Project
-- safeSpawn "nvidia-offload" ["alacritty","-e","tmux","new","-A","-s",name]
-- }
singleAppWithName' :: String -> String -> [String] -> Project
singleAppWithName' name app args = Project
singleAppWithName :: String -> String -> Project
singleAppWithName name app = Project
{ projectName = name
, projectDirectory = "/tmp"
, projectStartHook = Just $ do safeSpawn app args
, projectStartHook = Just $ do spawn app
}
singleAppWithName :: String -> String -> Project
singleAppWithName name app = singleAppWithName' name app []
singleApp :: String -> Project
singleApp app = singleAppWithName app app
singleJackApp :: String -> Project
singleJackApp app = singleAppWithName' app "pw-jack" [app]
projects :: [Project]
projects =
[ singleApp "m8c"
[ singleApp "carla"
, singleApp "obs"
, singleApp "patchage"
, singleApp "reaper"
, singleApp "renoise"
, singleApp "steam"
, singleJackApp "carla"
, singleJackApp "reaper"
, singleJackApp "renoise"
, singleAppWithName "Books" "calibre"
, singleAppWithName "discord" "Discord"
, singleAppWithName "element" "element-desktop"
, singleAppWithName "signal" "signal-desktop"
, singleAppWithName "youtube" "chromium"
, singleAppWithName' "vcv" "pw-jack" ["Rack"]
, singleAppWithName "vcv" "Rack"
, singleAppWithName "wire" "wire-desktop"
, singleTermAppWithName "email" "neomutt"
, Project { projectName = "admin"
, projectDirectory = "~/admin/nixos-config"
@ -69,6 +63,12 @@ projects =
, projectStartHook = Just $ do safeSpawn "emacsclient" ["-c"]
safeSpawnProg term
}
, Project { projectName = "cdc-documentation"
, projectDirectory = "~/admin/cdc-documentation"
, projectStartHook = Just $ do
safeSpawnProg term
safeSpawn "emacsclient" ["-c"]
}
, Project { projectName = "rukokuoppa"
, projectDirectory = "~/candy/rukokuoppa"
, projectStartHook = Just $ do safeSpawn "emacsclient" ["-c"]
@ -84,11 +84,6 @@ projects =
, projectStartHook = Just $ do safeSpawn "emacsclient" ["-c"]
safeSpawnProg term
}
, Project { projectName = "m8"
, projectDirectory = "~/candy/m8c"
, projectStartHook = Just $ do safeSpawn "emacsclient" ["-c"]
safeSpawnProg term
}
, Project { projectName = "waymonad"
, projectDirectory = "~/candy/waymonad"
, projectStartHook = Just $ do safeSpawn "emacsclient" ["-c"]

View File

@ -38,7 +38,7 @@ layouts = toggleLayouts fullscreen tiled
-- For className, use the second value that xprop gives you.
-------------- Here be the law of windows
myManageHook = composeAll
[ className =? "Patchage" --> doShift "sound"
[ className =? "Patchage" --> doShift "patchage"
, className =? "Pavucontrol" --> doShift "music"
, className =? "Pinentry" --> doCenterFloat
, className =? "REAPER" --> hasBorder False