summaryrefslogtreecommitdiff
path: root/src/Propellor/Types.hs
diff options
context:
space:
mode:
authorJoey Hess2015-04-29 14:26:13 -0400
committerJoey Hess2015-04-29 14:26:13 -0400
commit681e4dbbcb880e8e2526519fc58d4f2994a41577 (patch)
tree58f0951f6fc4fc7c534b7c293592386b7575164a /src/Propellor/Types.hs
parent960745b95e96e3d276e275554584c9bd13565f5b (diff)
propellor spin
Diffstat (limited to 'src/Propellor/Types.hs')
-rw-r--r--src/Propellor/Types.hs6
1 files changed, 4 insertions, 2 deletions
diff --git a/src/Propellor/Types.hs b/src/Propellor/Types.hs
index ba63cf9d..474385b7 100644
--- a/src/Propellor/Types.hs
+++ b/src/Propellor/Types.hs
@@ -40,7 +40,7 @@ module Propellor.Types
import Data.Monoid
import Control.Applicative
import "mtl" Control.Monad.RWS.Strict
-import "MonadCatchIO-transformers" Control.Monad.CatchIO
+import Control.Monad.Catch
import qualified Data.Set as S
import qualified Data.Map as M
@@ -73,7 +73,9 @@ newtype Propellor p = Propellor { runWithHost :: RWST Host [EndAction] () IO p }
, MonadReader Host
, MonadWriter [EndAction]
, MonadIO
- , MonadCatchIO
+ , MonadCatch
+ , MonadThrow
+ , MonadMask
)
instance Monoid (Propellor Result) where