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

Fixed some minor typos

Browse source
This commit is contained in:
Alexander Kjeldaas 2016-03-25 19:09:44 +01:00
parent 0ad60fe093
commit 0c01b0dba4
1 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
servant-server/src/Servant/Server/Internal/ServantErr.hs
View file

@ -112,7 +112,7 @@ err305 = ServantErr { errHTTPCode = 305
-- Example: -- Example:
-- --
-- > failingHandler :: ExceptT ServantErr IO () -- > failingHandler :: ExceptT ServantErr IO ()
-- > failingHandler = throwErr $ err307 -- > failingHandler = throwErr err307
-- --
err307 :: ServantErr err307 :: ServantErr
err307 = ServantErr { errHTTPCode = 307 err307 = ServantErr { errHTTPCode = 307
@ -210,7 +210,7 @@ err405 = ServantErr { errHTTPCode = 405
-- Example: -- Example:
-- --
-- > failingHandler :: ExceptT ServantErr IO () -- > failingHandler :: ExceptT ServantErr IO ()
-- > failingHandler = throwErr $ err406 -- > failingHandler = throwErr err406
-- --
err406 :: ServantErr err406 :: ServantErr
err406 = ServantErr { errHTTPCode = 406 err406 = ServantErr { errHTTPCode = 406
@ -224,7 +224,7 @@ err406 = ServantErr { errHTTPCode = 406
-- Example: -- Example:
-- --
-- > failingHandler :: ExceptT ServantErr IO () -- > failingHandler :: ExceptT ServantErr IO ()
-- > failingHandler = throwErr $ err407 -- > failingHandler = throwErr err407
-- --
err407 :: ServantErr err407 :: ServantErr
err407 = ServantErr { errHTTPCode = 407 err407 = ServantErr { errHTTPCode = 407
@ -266,7 +266,7 @@ err410 = ServantErr { errHTTPCode = 410
-- Example: -- Example:
-- --
-- > failingHandler :: ExceptT ServantErr IO () -- > failingHandler :: ExceptT ServantErr IO ()
-- > failingHandler = throwErr $ err411 -- > failingHandler = throwErr err411
-- --
err411 :: ServantErr err411 :: ServantErr
err411 = ServantErr { errHTTPCode = 411 err411 = ServantErr { errHTTPCode = 411
@ -308,7 +308,7 @@ err413 = ServantErr { errHTTPCode = 413
-- Example: -- Example:
-- --
-- > failingHandler :: ExceptT ServantErr IO () -- > failingHandler :: ExceptT ServantErr IO ()
-- > failingHandler = throwErr $ err414 { errBody = "Maxiumu length is 64." } -- > failingHandler = throwErr $ err414 { errBody = "Maximum length is 64." }
-- --
err414 :: ServantErr err414 :: ServantErr
err414 = ServantErr { errHTTPCode = 414 err414 = ServantErr { errHTTPCode = 414
@ -364,7 +364,7 @@ err417 = ServantErr { errHTTPCode = 417
-- Example: -- Example:
-- --
-- > failingHandler :: ExceptT ServantErr IO () -- > failingHandler :: ExceptT ServantErr IO ()
-- > failingHandler = throwErr $ err300 { errBody = "Exception in module A.B.C:55. Have a great day!" } -- > failingHandler = throwErr $ err500 { errBody = "Exception in module A.B.C:55. Have a great day!" }
-- --
err500 :: ServantErr err500 :: ServantErr
err500 = ServantErr { errHTTPCode = 500 err500 = ServantErr { errHTTPCode = 500