Avoid type aliasing configurables

This commit is contained in:
Tessa Kelly 2022-09-06 13:40:02 -06:00
parent 602b18664b
commit 1e012a0001

View File

@ -114,19 +114,15 @@ type Initialized
| NotInitialized | NotInitialized
{-| Config is used by init to setup an initial Model {-| Setup initial model
-} -}
type alias Config marker = init :
{ id : String { id : String
, highlightables : List (Highlightable marker) , highlightables : List (Highlightable marker)
, marker : Tool.Tool marker , marker : Tool.Tool marker
, onClickAction : OnClickAction , onClickAction : OnClickAction
} }
-> Model marker
{-| Setup initial model
-}
init : Config marker -> Model marker
init config = init config =
{ id = config.id { id = config.id
, highlightables = config.highlightables , highlightables = config.highlightables