diff --git a/lib/Projects.hs b/lib/Projects.hs
index 17024a6..00e3596 100644
--- a/lib/Projects.hs
+++ b/lib/Projects.hs
@@ -32,10 +32,13 @@ spinInTerm :: String -> Project
 spinInTerm name = spinInTermWithName name name
 
 justStart :: String -> Project
-justStart name =
+justStart name = justStartWithName name name
+
+justStartWithName :: String -> String -> Project
+justStartWithName name pgm =
   Project { projectName = name
           , projectDirectory = "/tmp"
-          , projectStartHook = Just $ do safeSpawnProg name
+          , projectStartHook = Just $ do safeSpawnProg pgm
           }
 
 adminProject = spinTextEditorAndTerm "~/admin/"
@@ -46,11 +49,13 @@ projects :: [Project]
 projects =  [ adminProject "wrk-config"
             , adminProject "cdc-config"
             , adminProject "overlays-personal"
+            , candyProject "adventofcode"
             , candyProject "dhall-packages"
             , candyProject "hfdb"
-            , candyProject "adventofcode"
-            , justStart "obs"
-            , justStart "m8c"
+            , justStartWithName "fre" "ff-perso"
+            , justStartWithName "frs" "ff-relex"
+            , justStartWithName "meeeting" "chromium"
+            , justStartWithName "notes" "obsidian"
             , spinChat "element"
             , spinChat "signal"
             , spinChat "wire"
@@ -59,6 +64,7 @@ projects =  [ adminProject "wrk-config"
             , spinTextEditorAndTerm "~/." "xmonad" -- Dark magic!
             , workProject "azure-core-infra"
             , workProject "azure-kube-platform"
+            , workProject "azure-kube-platform-environments"
             , workProject "bob-the-builder"
             , workProject "calculation-node-playbook"
             , workProject "common-cicd-config-private-cloud"
@@ -110,29 +116,12 @@ projects =  [ adminProject "wrk-config"
                       , projectStartHook = Just $ do
                           safeSpawn "nvidia-offload" ["kitty","gotop"]
                       }
-            , Project { projectName = "frs"
-                      , projectDirectory = "/tmp"
-                      , projectStartHook = Just $ do safeSpawnProg "ff-relex"
-                      }
-            , Project { projectName = "fre"
-                      , projectDirectory = "/tmp"
-                      , projectStartHook = Just $ do safeSpawnProg "ff-perso"
-                      }
-            , Project { projectName = "network-graph"
-                      , projectDirectory = "~/relex/catch-a-network-bug/csvplotter"
-                      , projectStartHook = Just $ do safeSpawn "zathura" ["weekXGraph.pdf"]
-                                                     safeSpawnProg "st"
-                      }
             , Project { projectName = "sound"
                       , projectDirectory = "/tmp"
                       , projectStartHook = Just $ do
                           safeSpawn "pw-jack" ["patchage"]
                           safeSpawnProg "easyeffects"
                       }
-            , Project { projectName = "meeting"
-                      , projectDirectory = "/tmp"
-                      , projectStartHook = Just $ do safeSpawnProg "chromium"
-                      }
            ]
 
 modify :: XConfig l -> XConfig l