haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

..

Browse Source
This commit is contained in:
Maximilian Tagher 2019-11-24 15:56:42 -05:00
parent 596db81d7a
commit 92afb1150a
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
yesod-test/Yesod/Test.hs
View File

@ -610,6 +610,8 @@ htmlCount query count = do
-- --
-- > get CommentR -- > get CommentR
-- > (comment :: Comment) <- requireJSONResponse -- > (comment :: Comment) <- requireJSONResponse
--
-- @since 1.6.9
requireJSONResponse :: (HasCallStack, FromJSON a) => YesodExample site a requireJSONResponse :: (HasCallStack, FromJSON a) => YesodExample site a
requireJSONResponse = do requireJSONResponse = do
withResponse $ \(SResponse _status headers body) -> do withResponse $ \(SResponse _status headers body) -> do