haskell/minio-hs
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix: bump for unliftio

Browse Source
This commit is contained in:
Gregor Kleen 2020-08-10 16:31:03 +02:00
parent 076d65a618
commit 42103ab247
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Network/Minio/Data.hs
View File

@ -1058,7 +1058,7 @@ newtype Minio a = Minio
)
instance MonadUnliftIO Minio where
askUnliftIO = (\(U.UnliftIO unliftIO) -> U.UnliftIO $ \(Minio f) -> unliftIO f) <$> Minio U.askUnliftIO
withRunInIO inner = Minio $ U.askUnliftIO >>= \(U.UnliftIO unliftIO) -> liftIO (inner $ \(Minio f) -> unliftIO f)
-- | MinioConn holds connection info and a connection pool to allow
-- for efficient resource re-use.