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

fix haddocks

Browse source
This commit is contained in:
Alp Mestanogullari 2014-11-22 15:58:52 +01:00
parent e9ebb0f10b
commit c945915f1d
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/Servant/API/Capture.hs
View file

@ -39,9 +39,9 @@ captured _ = fromText
--
-- Example:
--
-- > type MyApi = "books" ':>' 'Capture' "isbn" 'Text' ':>' 'Get' Book
-- > type MyApi = "books" :> Capture "isbn" Text :> Get Book
-- >
-- > server :: 'Server' MyApi
-- > server :: Server MyApi
-- > server = getBook
-- > where getBook :: Text -> 'EitherT' (Int, String) IO Book
-- > getBook isbn = ...
@ -73,7 +73,7 @@ instance (KnownSymbol capture, FromText a, HasServer sublayout)
--
-- Example:
--
-- > type MyApi = "books" ':>' 'Capture' "isbn" 'Text' ':>' 'Get' Book
-- > type MyApi = "books" :> Capture "isbn" Text :> Get Book
-- >
-- > myApi :: Proxy MyApi
-- > myApi = Proxy