summaryrefslogtreecommitdiff
path: root/Property.hs
diff options
context:
space:
mode:
authorJoey Hess2014-03-30 00:28:56 -0400
committerJoey Hess2014-03-30 00:28:56 -0400
commit3368bdd0a18a58f10fbec8880562ad63b85bcfd5 (patch)
treeecc22f01c33c19a5bdb1a0b09a3244c2973f75ca /Property.hs
parentc1ad516a6c85d5fc7733151bcae07495e69319ea (diff)
improvements
Diffstat (limited to 'Property.hs')
-rw-r--r--Property.hs4
1 files changed, 1 insertions, 3 deletions
diff --git a/Property.hs b/Property.hs
index ded40c4b..3243d278 100644
--- a/Property.hs
+++ b/Property.hs
@@ -5,7 +5,6 @@ import Control.Applicative
import Control.Monad
import System.Console.ANSI
import System.Exit
-import System.IO
import Utility.Tmp
import Utility.Exception
@@ -75,9 +74,8 @@ ensureProperties ps = do
where
ensure [] rs = return rs
ensure (l:ls) rs = do
- putStr $ propertyDesc l ++ "... "
- hFlush stdout
r <- ensureProperty l
+ putStr $ propertyDesc l ++ "... "
case r of
FailedChange -> do
setSGR [SetColor Foreground Vivid Red]