pms-infra-cmdrun 0.0.7.0 → 0.0.8.0
raw patch · 3 files changed
+21/−4 lines, 3 files
Files
- CHANGELOG.md +4/−0
- pms-infra-cmdrun.cabal +1/−1
- src/PMS/Infra/CmdRun/DS/Core.hs +16/−3
CHANGELOG.md view
@@ -1,5 +1,9 @@ # Revision history for pms-infra-cmdrun +## 0.0.8.0 -- 2025-09-23++* Support base64 image tool response.+ ## 0.0.7.0 -- 2025-09-07 * Support invalidChars configs.
pms-infra-cmdrun.cabal view
@@ -20,7 +20,7 @@ -- PVP summary: +-+------- breaking API changes -- | | +----- non-breaking API additions -- | | | +--- code changes with no API change-version: 0.0.7.0+version: 0.0.8.0 -- A short (one-line) description of the package. synopsis: pms-infra-cmdrun
src/PMS/Infra/CmdRun/DS/Core.hs view
@@ -191,9 +191,22 @@ let outStr = T.unpack $ TE.decodeUtf8With TEE.lenientDecode outBS errStr = T.unpack $ TE.decodeUtf8With TEE.lenientDecode errBS jsonRpc = cmdDat^.DM.jsonrpcDefaultCmdRunCommandData- content = [ DM.McpToolsCallResponseResultContent "text" outStr- , DM.McpToolsCallResponseResultContent "text" errStr- ]+ content =+ case (decodeStrict' outBS) of+ Just val -> [+ val+ , DM.McpToolsCallResponseResultContent "text" errStr+ ]+ Nothing -> [+ DM.McpToolsCallResponseResultContent "text" outStr+ , DM.McpToolsCallResponseResultContent "text" errStr+ ]++ -- content = [+ -- "{\"type\":\"text\",\"text\":\"" ++ outStr ++ "\"}"+ -- , "{\"type\":\"text\",\"text\":\"" ++ errStr ++ "\"}"+ -- ]+ result = DM.McpToolsCallResponseResult { DM._contentMcpToolsCallResponseResult = content , DM._isErrorMcpToolsCallResponseResult = (ExitSuccess /= code)