Add input field to provide colors for tag categories

This commit is contained in:
Eike Kettner
2020-06-07 21:42:11 +02:00
parent c595f3b737
commit f4e37b512f
9 changed files with 458 additions and 54 deletions

View File

@ -8,6 +8,7 @@ module Comp.FixedDropdown exposing
, initTuple
, update
, view
, viewString
)
import Html exposing (..)
@ -101,6 +102,11 @@ view selected model =
]
viewString : Maybe String -> Model String -> Html (Msg String)
viewString selected model =
view (Maybe.map (\s -> Item s s) selected) model
renderItems : Item a -> Html (Msg a)
renderItems item =
div [ class "item", onClick (SelectItem item) ]