diff options
| author | Joey Hess <joeyh@joeyh.name> | 2017-03-15 15:59:44 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2017-03-15 15:59:44 -0400 |
| commit | 30871a7c2652dbfc07485bdc28d522c7c3272464 (patch) | |
| tree | ca6148badae3bc609393c1baf49aa977e864a267 | |
| parent | f49fd3b9f1baa23cd6f587cf0c33251381ea2adf (diff) | |
desc
| -rw-r--r-- | src/Propellor/Property.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Propellor/Property.hs b/src/Propellor/Property.hs index 706e684b..94c82c9f 100644 --- a/src/Propellor/Property.hs +++ b/src/Propellor/Property.hs @@ -357,6 +357,9 @@ makeChange a = liftIO a >> return MadeChange noChange :: Propellor Result noChange = return NoChange +-- | A no-op property. +-- +-- This is the same as `mempty` from the `Monoid` instance. doNothing :: SingI t => Property (MetaTypes t) doNothing = mempty |