antiope-shell 7.4.0 → 7.4.1

raw patch · 2 files changed

+4/−3 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• antiope-shell.cabal +1/−1
• src/Antiope/Shell/S3.hs +3/−2

@@ -1,7 +1,7 @@ cabal-version: 2.4  name:                   antiope-shell-version:                7.4.0+version:                7.4.1 synopsis:               Please see the README on Github at <https://github.com/arbor/antiope#readme> description:            Please see the README on Github at <https://github.com/arbor/antiope#readme>. category:               Services

@@ -54,9 +54,10 @@    case exitCode of     IO.ExitSuccess   -> do-      let bs = LBS.fromStrict (T.encodeUtf8 (T.pack stdout))+      let stdoutText = T.pack stdout+      let bs = LBS.fromStrict (T.encodeUtf8 stdoutText)       let repResult = J.eitherDecode bs :: Either String PutObjectReply       case repResult of         Right rep -> return (ETag (T.encodeUtf8 (rep ^. the @"eTag")))-        Left msg  -> throwError $ "Command failed to return expected metadata: " <> T.pack msg+        Left msg  -> throwError $ "Command failed to return expected metadata: " <> T.pack msg <> " given stdout: " <> stdoutText     IO.ExitFailure n -> throwError $ "Command failed with exit code: " <> T.pack (show n)