eeva/servant
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Merge pull request #791 from ivan-m/defAction-doc

Browse Source 
Make defAction's documentation visible to Haddock
This commit is contained in:
Oleg Grenrus 2017-07-28 12:29:57 +03:00 committed by GitHub
commit 9428eecda8
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
servant-docs/src/Servant/Docs/Internal.hs
View File

@ -263,8 +263,8 @@ combineAction :: Action -> Action -> Action
Action a c h p n m ts body resp `combineAction` Action a' c' h' p' n' m' _ _ _ = Action a c h p n m ts body resp `combineAction` Action a' c' h' p' n' m' _ _ _ =
Action (a <> a') (c <> c') (h <> h') (p <> p') (n <> n') (m <> m') ts body resp Action (a <> a') (c <> c') (h <> h') (p <> p') (n <> n') (m <> m') ts body resp
-- Default 'Action'. Has no 'captures', no GET 'params', expects -- | Default 'Action'. Has no 'captures', no GET 'params', expects no
-- no request body ('rqbody') and the typical response is 'defResponse'. -- request body ('rqbody') and the typical response is 'defResponse'.
-- --
-- Tweakable with lenses. -- Tweakable with lenses.
-- --