From 23fb5e1f568e8810b1e2906d7688d65035508048 Mon Sep 17 00:00:00 2001 From: Jonathan Date: Sun, 10 Apr 2016 11:03:48 -0500 Subject: [PATCH] Fix code example in haddock of servant-mock The example in the haddock does not coincide with the example code in servant-mock/example/main.hs --- servant-mock/src/Servant/Mock.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/servant-mock/src/Servant/Mock.hs b/servant-mock/src/Servant/Mock.hs index 9e9fed8a..8bf9a56e 100644 --- a/servant-mock/src/Servant/Mock.hs +++ b/servant-mock/src/Servant/Mock.hs @@ -52,7 +52,7 @@ -- @ -- main :: IO () -- main = Network.Wai.Handler.Warp.run 8080 $ --- 'serve' myAPI ('mock' myAPI) +-- 'serve' myAPI ('mock' myAPI Proxy) -- @ module Servant.Mock ( HasMock(..) ) where @@ -90,7 +90,7 @@ class HasServer api context => HasMock api context where -- -- let's say we will start with the frontend, -- -- and hence need a placeholder server -- server :: Server API - -- server = mock api + -- server = mock api Proxy -- @ -- -- What happens here is that @'Server' API@