Accept up2date package parameter
All checks were successful
Build / audit (push) Successful in 16m10s
Build / test (push) Successful in 16m35s

This commit is contained in:
2023-12-11 08:14:55 +01:00
parent e9504fb8e5
commit 6a063b2cc4
7 changed files with 29 additions and 135 deletions

View File

@@ -1,11 +1,19 @@
module SlackBuilder.Trans
( SlackBuilderT(..)
( SlackBuilderException(..)
, SlackBuilderT(..)
) where
import Control.Monad.Trans.Reader (ReaderT(..))
import Data.Text (Text)
import SlackBuilder.Config
import Control.Monad.IO.Class (MonadIO(..))
import Control.Monad.Catch (MonadCatch(..), MonadThrow(..))
import Control.Exception (Exception(..))
newtype SlackBuilderException = UpdaterNotFound Text
deriving Show
instance Exception SlackBuilderException
newtype SlackBuilderT a = SlackBuilderT
{ runSlackBuilderT :: ReaderT Settings IO a