From 48b4626af26ac8a8ed21692752af09a9e0d0b93e Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 31 Mar 2014 01:19:40 -0400 Subject: reset title --- Propellor/Engine.hs | 2 ++ 1 file changed, 2 insertions(+) diff --git a/Propellor/Engine.hs b/Propellor/Engine.hs index 29c635e0..22091938 100644 --- a/Propellor/Engine.hs +++ b/Propellor/Engine.hs @@ -13,6 +13,8 @@ ensureProperty = catchDefaultIO FailedChange . propertySatisfy ensureProperties :: [Property] -> IO () ensureProperties ps = do r <- ensureProperties' [Property "overall" $ ensureProperties' ps] + setTitle "propellor done" + hFlush stdout case r of FailedChange -> exitWith (ExitFailure 1) _ -> exitWith ExitSuccess -- cgit v1.2.3