Custom container in Elm Infinite List

Main.elm

infiniteListConfig : State a -> IL.Config (Item a) (Msg a)
infiniteListConfig state =
    IL.config
        { itemView = viewRow state
        , itemHeight = IL.withConstantHeight state.config.lineHeight
        , containerHeight = Basics.round state.containerHeight
        }
        |> IL.withOffset 300
        |> IL.withCustomContainer customContainer


customContainer : List ( String, String ) -> List (Html.Html msg) -> Html.Html msg
customContainer styles children =
    Html.div
        [ Html.Attributes.style "margin" "0px"
        , Html.Attributes.style "padding" "0px"
        , Html.Attributes.style "box-sizing" "border-box"
        , Html.Attributes.style "display" "flex"
        , Html.Attributes.style "flex-direction" "column"
        , Html.Attributes.style "background-color" "#ffdf2a"

        -- to fill all remaining height
        , Html.Attributes.style "flex" "2"
        , Html.Attributes.style "width" "100%"
        ]
        children