summaryrefslogtreecommitdiff
path: root/Propellor/Types.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Propellor/Types.hs')
-rw-r--r--Propellor/Types.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Propellor/Types.hs b/Propellor/Types.hs
index 5874863c..00ddbd98 100644
--- a/Propellor/Types.hs
+++ b/Propellor/Types.hs
@@ -30,8 +30,8 @@ class ActionResult a where
getActionResult :: a -> (String, ColorIntensity, Color)
instance ActionResult Bool where
- getActionResult False = ("ok", Vivid, Red)
- getActionResult True = ("failed", Vivid, Green)
+ getActionResult False = ("failed", Vivid, Red)
+ getActionResult True = ("ok", Vivid, Green)
instance ActionResult Result where
getActionResult NoChange = ("unchanged", Dull, Green)