Add some missing doc comments.

This commit is contained in:
Dillon Kearns 2022-04-06 16:58:52 -07:00
parent 56b3e7f855
commit c7dbf796b1
3 changed files with 10 additions and 2 deletions

File diff suppressed because one or more lines are too long

View File

@ -126,6 +126,8 @@ Steps
@docs FieldInfoSimple, FieldState, FinalFieldInfo, FormInfo, No, RawFieldState, TimeOfDay, Yes
@docs fieldStatusToString
-}
import DataSource exposing (DataSource)
@ -156,6 +158,7 @@ type FieldStatus
| Blurred
{-| -}
fieldStatusToString : FieldStatus -> String
fieldStatusToString fieldStatus =
case fieldStatus of

View File

@ -3,10 +3,10 @@ module Server.Response exposing
, json, plainText, temporaryRedirect, permanentRedirect
, emptyBody, body, bytesBody, base64Body
, render
, errorPage, mapError
, map
, withHeader, withHeaders, withStatusCode, withSetCookieHeader
, toJson
, errorPage, mapError
)
{-|
@ -45,6 +45,11 @@ You can use `withHeader` and `withStatusCode` to customize either type of Respon
@docs render
## Rendering Error Pages
@docs errorPage, mapError
@docs map