Skip to content

Commit f0d78d7

Browse files
committed
fix: Reverse request without payload trash
`setField "type"` was just appending the "type" to the current payload. We should use `setType` instead, which "starts from scratch" the payload. It is also what we use for e.g. `sendSuccesfulResponse`, `sendSuccesfulEvent`, `sendErrorResponse`, etc... Fixes #34
1 parent 2069566 commit f0d78d7

1 file changed

Lines changed: 1 addition & 1 deletion

File tree

src/DAP/Adaptor.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -306,7 +306,7 @@ sendReverseRequest
306306
:: ReverseCommand
307307
-> Adaptor app Request ()
308308
sendReverseRequest rcmd = send $ do
309-
setField "type" MessageTypeRequest
309+
setType MessageTypeRequest
310310
setField "command" rcmd
311311
----------------------------------------------------------------------------
312312
-- | Send runInTerminal reverse request

0 commit comments

Comments
 (0)