summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Propellor/Engine.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Propellor/Engine.hs b/src/Propellor/Engine.hs
index 90b8e3d8..0835660f 100644
--- a/src/Propellor/Engine.hs
+++ b/src/Propellor/Engine.hs
@@ -62,6 +62,9 @@ runEndAction host res (EndAction desc a) = actionMessageOn (hostName host) desc
-- | For when code running in the Propellor monad needs to ensure a
-- Property.
+--
+-- Note that the Info of the Property is not propigated out, so it will
+-- not be visible to propellor, unless you arrange for it to be propigated.
ensureProperty :: Property -> Propellor Result
ensureProperty = catchPropellor . propertySatisfy