249e3113ff
*sigh* ... spent way too much time encoding/decoding date types... I need my database, server, client, and JSON need to agree on types. TL;DR: - Add CSS for elm/datepicker library - Create Common.allErrors to display UI errors - Prefer Data.Time.Calendar.Day instead of newtype Date wrapper around Text
27 lines
659 B
Elm
27 lines
659 B
Elm
module Common exposing (..)
|
|
|
|
import Html exposing (..)
|
|
import Maybe.Extra as ME
|
|
import State
|
|
import UI
|
|
import Utils
|
|
|
|
|
|
allErrors : State.Model -> Html State.Msg
|
|
allErrors model =
|
|
div []
|
|
(State.allErrors
|
|
model
|
|
|> List.map
|
|
(\( mError, title ) ->
|
|
case mError of
|
|
Nothing ->
|
|
text ""
|
|
|
|
Just err ->
|
|
UI.errorBanner
|
|
{ title = title
|
|
, body = Utils.explainHttpError err
|
|
}
|
|
)
|
|
)
|