ipfs 1.3.0.3 → 1.3.1

raw patch · 4 files changed

+10/−3 lines, 4 filesdep +servant-multipart-apidep +servant-multipart-clientPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependencies added: servant-multipart-api, servant-multipart-client

API changes (from Hackage documentation)

- Network.IPFS.File.Form.Types: instance Servant.Multipart.ToMultipart Servant.Multipart.Tmp Network.IPFS.File.Form.Types.Form

+ Network.IPFS.File.Form.Types: instance Servant.Multipart.API.ToMultipart Servant.Multipart.API.Tmp Network.IPFS.File.Form.Types.Form

+ Network.IPFS.Prelude: AsyncCancelled :: AsyncCancelled

+ Network.IPFS.Prelude: asyncExceptionFromException :: Exception e => SomeException -> Maybe e

+ Network.IPFS.Prelude: asyncExceptionToException :: Exception e => e -> SomeException

+ Network.IPFS.Prelude: catchSyncOrAsync :: (MonadUnliftIO m, Exception e) => m a -> (e -> m a) -> m a

+ Network.IPFS.Prelude: data AsyncCancelled

+ Network.IPFS.Prelude: fromExceptionUnwrap :: Exception e => SomeException -> Maybe e

+ Network.IPFS.Prelude: handleSyncOrAsync :: (MonadUnliftIO m, Exception e) => (e -> m a) -> m a -> m a

+ Network.IPFS.Prelude: mapExceptionM :: (Exception e1, Exception e2, MonadUnliftIO m) => (e1 -> e2) -> m a -> m a

+ Network.IPFS.Prelude: trySyncOrAsync :: (MonadUnliftIO m, Exception e) => m a -> m (Either e a)

Files

ipfs.cabal +5/−1
library/Network/IPFS/Client.hs +2/−0
library/Network/IPFS/DAG.hs +2/−2
library/Network/IPFS/File/Form/Types.hs +1/−0

ipfs.cabal view

@@ -5,7 +5,7 @@ -- see: https://github.com/sol/hpack  name:           ipfs-version:        1.3.0.3+version:        1.3.1 synopsis:       Access IPFS locally and remotely description:    Interact with the IPFS network by shelling out to a local IPFS node or communicating via the HTTP interface of a remote IPFS node. category:       Network@@ -151,6 +151,8 @@     , servant     , servant-client     , servant-multipart+    , servant-multipart-api+    , servant-multipart-client     , servant-server     , swagger2     , text@@ -229,6 +231,8 @@     , servant     , servant-client     , servant-multipart+    , servant-multipart-api+    , servant-multipart-client     , servant-server     , swagger2     , text

library/Network/IPFS/Client.hs view

@@ -9,8 +9,10 @@   ) where  import qualified RIO.ByteString.Lazy                             as Lazy+ import           Servant import           Servant.Client+import           Servant.Multipart.Client                        ()  import           Network.IPFS.Internal.Orphanage.ByteString.Lazy () import           Network.IPFS.Prelude                            hiding (object)

library/Network/IPFS/DAG.hs view

@@ -9,7 +9,7 @@ import qualified RIO.ByteString.Lazy               as Lazy  import           Servant.Client-import qualified Servant.Multipart                 as Multipart+import qualified Servant.Multipart.Client          as Multipart.Client  import           Network.IPFS.Prelude @@ -46,5 +46,5 @@  putRemote :: MonadRemoteIPFS m => File.Serialized -> m (Either ClientError DAG.Put.Response) putRemote file = do-  boundary  <- liftIO Multipart.genBoundary+  boundary  <- liftIO Multipart.Client.genBoundary   runRemote (IPFS.Client.dagPut True (boundary, File.Form "file" file))

library/Network/IPFS/File/Form/Types.hs view

@@ -4,6 +4,7 @@ import qualified RIO.ByteString.Lazy     as Lazy  import           Servant.Multipart+import           Servant.Multipart.API  import qualified Network.IPFS.File.Types as File