diff --git a/hbs2-git-reposync/ReposyncMain.hs b/hbs2-git-reposync/ReposyncMain.hs index 15a22000..7621d810 100644 --- a/hbs2-git-reposync/ReposyncMain.hs +++ b/hbs2-git-reposync/ReposyncMain.hs @@ -270,6 +270,7 @@ runSync = do let p = shell "/usr/bin/env git-http-backend" & setEnv env -- & setStderr closed (code, out) <- readProcessStdout p + -- FIXME: remove liftIO $ LBS.putStrLn out (s, h, body) <- parseResp out