on master help sign in
Fix haddock documentation for (//) and (/:)
0c80bc8Gaël Deest
servant-client-core/src/Servant/Client/Core/HasClient.hs+4−4
@@ -874,7 +874,7 @@ infixl 2 /:
874--
874--
875-- Example:
875-- Example:
876--
876--
877−-- @@
877+-- @
878-- type Api = NamedRoutes RootApi
878-- type Api = NamedRoutes RootApi
879--
879--
880-- data RootApi mode = RootApi
880-- data RootApi mode = RootApi
@@ -895,7 +895,7 @@ infixl 2 /:
895--
895--
896-- endpointClient :: ClientM Person
896-- endpointClient :: ClientM Person
897-- endpointClient = client // subApi // endpoint
897-- endpointClient = client // subApi // endpoint
898−-- @@
898+-- @
899(//) :: a -> (a -> b) -> b
899(//) :: a -> (a -> b) -> b
900x // f = f x
900x // f = f x
901
901
@@ -906,7 +906,7 @@ x // f = f x
906--
906--
907-- Example:
907-- Example:
908--
908--
909−-- @@
909+-- @
910-- type Api = NamedRoutes RootApi
910-- type Api = NamedRoutes RootApi
911--
911--
912-- data RootApi mode = RootApi
912-- data RootApi mode = RootApi
@@ -931,7 +931,7 @@ x // f = f x
931--
931--
932-- endpointClient :: ClientM Person
932-- endpointClient :: ClientM Person
933-- endpointClient = client // subApi /: "foobar123" // endpoint
933-- endpointClient = client // subApi /: "foobar123" // endpoint
934−-- @@
934+-- @
935(/:) :: (a -> b -> c) -> b -> a -> c
935(/:) :: (a -> b -> c) -> b -> a -> c
936(/:) = flip
936(/:) = flip
937
937