diff --git a/Property.hs b/Property.hs index 3fdbcd3..a8d0dff 100644 --- a/Property.hs +++ b/Property.hs @@ -85,10 +85,10 @@ ensureProperties ps = do putStrLn "failed" NoChange -> do setSGR [SetColor Foreground Dull Green] - putStrLn "(ok)" + putStrLn "unchanged" MadeChange -> do setSGR [SetColor Foreground Vivid Green] - putStrLn "(ok)" + putStrLn "ok" setSGR [] ensure ls (combineResult r rs)