diff --git a/src/HaskellCI.hs b/src/HaskellCI.hs
index 976589bb..56f4c37b 100644
--- a/src/HaskellCI.hs
+++ b/src/HaskellCI.hs
@@ -421,8 +421,8 @@ sourcehutFromConfigFile args opts path = do
     let prj' | cfgGhcHead config = over (mapped . field @"pkgJobs") (S.insert GHCHead) prj
              | otherwise         = prj
 
-    ls <- genSourcehutFromConfigs args config gitconfig prj' ghcs
-    return ls -- TODO patchSourcehut config ls
+    genSourcehutFromConfigs args config gitconfig prj' ghcs
+    -- TODO ls <- genSourcehutFromConfigs ...; patchSourcehut config ls
 
 genSourcehutFromConfigs
     :: (Monad m, MonadIO m, MonadDiagnostics m)