From 30871a7c2652dbfc07485bdc28d522c7c3272464 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 15 Mar 2017 15:59:44 -0400 Subject: desc --- src/Propellor/Property.hs | 3 +++ 1 file changed, 3 insertions(+) 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 -- cgit v1.2.3