summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/Propellor/Types.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/Propellor/Types.hs b/src/Propellor/Types.hs
index 0f96bbbc..d0481b69 100644
--- a/src/Propellor/Types.hs
+++ b/src/Propellor/Types.hs
@@ -40,6 +40,7 @@ data Host = Host
, hostProperties :: [Property]
, hostAttr :: Attr
}
+ deriving (Show)
-- | Propellor's monad provides read-only access to the host it's running
-- on, including its attributes.
@@ -64,6 +65,9 @@ data Property = Property
-- ^ a property can set an attribute of the host that has the property.
}
+instance Show Property where
+ show = propertyDesc
+
-- | A property that can be reverted.
data RevertableProperty = RevertableProperty Property Property