From d194765e10eae7769210f1b1a19c08835d555fed Mon Sep 17 00:00:00 2001
From: Joey Hess <joeyh@joeyh.name>
Date: Sun, 21 Dec 2014 21:14:11 -0400
Subject: propellor spin

---
 src/Propellor/Engine.hs | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'src/Propellor/Engine.hs')

diff --git a/src/Propellor/Engine.hs b/src/Propellor/Engine.hs
index dc8b2bc5..c00597be 100644
--- a/src/Propellor/Engine.hs
+++ b/src/Propellor/Engine.hs
@@ -4,7 +4,9 @@ module Propellor.Engine (
 	mainProperties,
 	runPropellor,
 	ensureProperty,
+	ensureProperty',
 	ensureProperties,
+	ensurePropertiesWith,
 	fromHost,
 	onlyProcess,
 	processChainOutput,
@@ -73,6 +75,7 @@ ensureProperty p = do
 		warningMessage $ "ensureProperty called on " ++ show p ++ "; will not propigate its info: " ++ show (getInfo p)
 	ensureProperty' p
 
+-- | ensureProperty without the warning message.
 ensureProperty' :: Property -> Propellor Result
 ensureProperty' = catchPropellor . propertySatisfy
 
-- 
cgit v1.3-2-g0d8e