Fix RPC failing tests

This commit is contained in:
Ruslan Talpa
2015-11-20 15:50:53 +02:00
parent f18cfbd7f4
commit aa2f0287b1
+1
View File
@@ -92,6 +92,7 @@ userIntent schema req reqBody =
reqPayload = case action of
ActionCreate -> Just payload
ActionUpdate -> Just payload
ActionInvoke -> Just payload
_ -> Nothing
where payload = case pickContentType (lookupHeader "content-type") of
Right ApplicationJSON ->