diff options
Diffstat (limited to 'src/Command.hs')
| -rw-r--r-- | src/Command.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Command.hs b/src/Command.hs index 599bd90..7ca257a 100644 --- a/src/Command.hs +++ b/src/Command.hs @@ -15,6 +15,7 @@ module Command ( getTerminalOutput, ) where +import Control.Monad.Catch import Control.Monad.Except import Control.Monad.Reader @@ -83,7 +84,7 @@ instance CommandArgumentsType [ Text ] where newtype CommandExec a = CommandExec (ReaderT CommandInput IO a) - deriving (Functor, Applicative, Monad, MonadIO) + deriving (Functor, Applicative, Monad, MonadIO, MonadThrow, MonadCatch, MonadMask) instance MonadFail CommandExec where fail = tfail . T.pack |