From 6f032f7ee3ac43d4b77c78786c0951b49ce5b8e7 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 2 Apr 2014 00:52:39 -0400 Subject: propellor spin --- Propellor/Types.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Propellor/Types.hs') diff --git a/Propellor/Types.hs b/Propellor/Types.hs index bcb5efd1..1be56748 100644 --- a/Propellor/Types.hs +++ b/Propellor/Types.hs @@ -48,10 +48,10 @@ class ActionResult a where instance ActionResult Bool where getActionResult False = ("failed", Vivid, Red) - getActionResult True = ("ok", Dull, Green) + getActionResult True = ("done", Dull, Green) instance ActionResult Result where - getActionResult NoChange = ("unchanged", Dull, Green) + getActionResult NoChange = ("ok", Dull, Green) getActionResult MadeChange = ("done", Vivid, Green) getActionResult FailedChange = ("failed", Vivid, Red) -- cgit v1.2.3