mpo/xmonad-config
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

Moving back to vim

Browse source
This commit is contained in:
EEva 2021-12-09 23:09:00 +02:00
parent 1eaae43e46
commit 964e01a3fa
1 changed files with 20 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

29
lib/Projects.hs
View file

@ -8,6 +8,9 @@ import XMonad.Util.Run
term = "alacritty"
spawnGuiTextEditor :: X ()
spawnGuiTextEditor = safeSpawn "vim" ["-g"]
singleTermAppWithName :: String -> String -> Project
singleTermAppWithName name app = Project
{ projectName = name
@ -49,12 +52,12 @@ projects =
, singleTermAppWithName "email" "neomutt"
, Project { projectName = "admin"
, projectDirectory = "~/admin/nixos-config"
, projectStartHook = Just $ do safeSpawn "emacsclient" ["-c"]
, projectStartHook = Just $ do spawnGuiTextEditor
safeSpawnProg term
}
, Project { projectName = "overlays-personal"
, projectDirectory = "~/admin/overlays-personal"
, projectStartHook = Just $ do safeSpawn "emacsclient" ["-c"]
, projectStartHook = Just $ do spawnGuiTextEditor
safeSpawnProg term
}
, Project { projectName = "steam"
@ -63,37 +66,45 @@ projects =
}
, Project { projectName = "youtube"
, projectDirectory = "/tmp"
, projectStartHook = Just $ safeSpawn "firefox" ["-P", "Youtube"]
, projectStartHook = Just $ safeSpawn "chromium"
["--app=youtube.com"
,"--incognito"]
}
, Project { projectName = "cdc-config"
, projectDirectory = "~/admin/cdc-config"
, projectStartHook = Just $ do safeSpawn "emacsclient" ["-c"]
, projectStartHook = Just $ do spawnGuiTextEditor
safeSpawnProg term
}
, Project { projectName = "cdc-documentation"
, projectDirectory = "~/admin/cdc-documentation"
, projectStartHook = Just $ do
safeSpawnProg term
safeSpawn "emacsclient" ["-c"]
spawnGuiTextEditor
}
, Project { projectName = "adventOfCode"
, projectDirectory = "~/candy/adventofcode"
, projectStartHook = Just $ do
safeSpawnProg term
spawnGuiTextEditor
}
, Project { projectName = "rukokuoppa"
, projectDirectory = "~/candy/rukokuoppa"
, projectStartHook = Just $ do safeSpawn "emacsclient" ["-c"]
, projectStartHook = Just $ do spawnGuiTextEditor
safeSpawnProg term
}
, Project { projectName = "notes"
, projectDirectory = "~/zk"
, projectStartHook = Just $ do safeSpawn "emacsclient" ["-c"]
, projectStartHook = Just $ do spawnGuiTextEditor
safeSpawnProg term
}
, Project { projectName = "xmonad"
, projectDirectory = "~/.xmonad"
, projectStartHook = Just $ do safeSpawn "emacsclient" ["-c"]
, projectStartHook = Just $ do spawnGuiTextEditor
safeSpawnProg term
}
, Project { projectName = "waymonad"
, projectDirectory = "~/candy/waymonad"
, projectStartHook = Just $ do safeSpawn "emacsclient" ["-c"]
, projectStartHook = Just $ do spawnGuiTextEditor
safeSpawnProg term
}
, Project { projectName = "accounting"