From 16ae2b503f109abbdd0cb1fca4065ec26b181d49 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 5 Jun 2014 17:10:16 -0400 Subject: display improvements --- src/Propellor/Types.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/Propellor/Types.hs b/src/Propellor/Types.hs index d0481b69..d91ce71b 100644 --- a/src/Propellor/Types.hs +++ b/src/Propellor/Types.hs @@ -66,7 +66,7 @@ data Property = Property } instance Show Property where - show = propertyDesc + show p = "property " ++ show (propertyDesc p) -- | A property that can be reverted. data RevertableProperty = RevertableProperty Property Property -- cgit v1.2.3