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

Remove overly specific comment.

Browse source
This commit is contained in:
Matthias Fischmann 2015-02-27 15:27:35 +01:00
parent 1a63d8797a
commit 27e842365f
1 changed files with 0 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/Servant/Server.hs
View file

@ -42,10 +42,5 @@ import Servant.Server.Internal
-- > -- >
-- > main :: IO () -- > main :: IO ()
-- > main = Network.Wai.Handler.Warp.run 8080 app -- > main = Network.Wai.Handler.Warp.run 8080 app
--
-- (If you need access to the wai 'Application' type, use
-- 'toApplication'. This is useful for writing custom servers that do
-- things other than routing (e.g. dumping all requests and responses
-- to a file).)
serve :: HasServer layout => Proxy layout -> Server layout -> Application serve :: HasServer layout => Proxy layout -> Server layout -> Application
serve p server = toApplication (route p server) serve p server = toApplication (route p server)