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

add RemoteHost to ComprehensiveAPI

Browse source
This commit is contained in:
Sönke Hahn 2016-01-18 11:01:30 +01:00
parent efd12053af
commit 290e4ef1ba
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
servant/src/Servant/API/Internal/Test/ComprehensiveAPI.hs
View file

@ -20,7 +20,7 @@ type ComprehensiveAPI =
QueryParams "foo" Int :> GET :<|> QueryParams "foo" Int :> GET :<|>
QueryFlag "foo" :> GET :<|> QueryFlag "foo" :> GET :<|>
-- Raw :<|> -- Raw :<|>
-- RemoteHost :<|> RemoteHost :> GET :<|>
ReqBody '[JSON] Int :> GET :<|> ReqBody '[JSON] Int :> GET :<|>
-- Get '[JSON] (Headers '[Header "foo" Int] ()) :<|> -- Get '[JSON] (Headers '[Header "foo" Int] ()) :<|>
"foo" :> GET :<|> "foo" :> GET :<|>