diff options
| author | Joey Hess <joeyh@joeyh.name> | 2015-01-19 16:14:01 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-01-19 16:14:01 -0400 |
| commit | 0a2a553d31fbb3c449ba30a395676241d193d478 (patch) | |
| tree | b1457dcef3e29d9e905ded98bd9054e05540258a | |
| parent | c8153ff0bd5629c9bfd665ae40c709999d1f8a7a (diff) | |
add back a warning aboit info propigation to ensureProperty
| -rw-r--r-- | src/Propellor/Engine.hs | 3 |
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 |