fix typo

2015-01-24 23:43:24 -04:00 · 2015-01-24 23:43:24 -04:00 · a780cae441
parent 0ee04ecc43
commit a780cae441
1 changed files with 2 additions and 2 deletions
--- a/src/Propellor/Property.hs
+++ b/src/Propellor/Property.hs
@ -43,8 +43,8 @@ flagFile' p getflagfile = adjustPropertySatisfy p $ \satisfy -> do
 onChange
 	:: (Combines (Property x) (Property y))
 	=> Property x
-        => Property y
-        => CombinedType (Property x) (Property y)
+        -> Property y
+        -> CombinedType (Property x) (Property y)
 onChange = combineWith $ \p hook -> do
 	r <- p
 	case r of