42fc048 · servant · git.iko.soy

git.iko.soy/servant

Add missing slash character in generated docs.

commit42fc048dfc57c2a1d41be84dcb1c50e100a63e8a authorPhil Freeman <paf31@cantab.net> dateWed 31 Dec 2014, 17:19 (12 years ago) parent87b7c8e

1 file changed+2−2

unifiedsplit

src/Servant/Docs.hs+2−2

@@ -175,7 +175,7 @@ instance Show Endpoint where

175175-- POST /foo

176176-- @

177177defEndpoint :: Endpoint

178−defEndpoint = Endpoint "/" DocGET

178+defEndpoint = Endpoint "" DocGET

179179

180180instance Hashable Endpoint

181181

@@ -577,7 +577,7 @@ instance (KnownSymbol path, HasDocs sublayout) => HasDocs (path :> sublayout) wh

577577 docsFor sublayoutP (endpoint', action)

578578

579579 where sublayoutP = Proxy :: Proxy sublayout

580− endpoint' = endpoint & path <>~ symbolVal pa

580+ endpoint' = endpoint & path <>~ '/' : symbolVal pa

581581 pa = Proxy :: Proxy path

582582

583583{-