summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Propellor/Types/Core.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Propellor/Types/Core.hs b/src/Propellor/Types/Core.hs
index fa939d2b..6fedc47e 100644
--- a/src/Propellor/Types/Core.hs
+++ b/src/Propellor/Types/Core.hs
@@ -74,7 +74,7 @@ data Props metatypes = Props [ChildProperty]
data ChildProperty = ChildProperty Desc (Propellor Result) Info [ChildProperty]
instance Show ChildProperty where
- show = getDesc
+ show p = "property " ++ show (getDesc p)
class IsProp p where
setDesc :: p -> Desc -> p