diff --git a/src/Propellor/Server.hs b/src/Propellor/Server.hs index 06fede7..eaf9649 100644 --- a/src/Propellor/Server.hs +++ b/src/Propellor/Server.hs @@ -78,7 +78,7 @@ updateServer hn hst connect = connect go hClose toh hClose fromh sendPrecompiled hn - loop + updateServer hn hst connect Nothing -> return () sendRepoUrl :: Handle -> IO ()