You don't need to use this module unless you want to customise the request debounce delay and minimum character count to perform a request.

update : Msg -> Model -> ( Model, Cmd Msg )
update msg model =
    case msg of
        SelectMsg subMsg ->
            Select.updateWithRequest
                (Select.request fetchThings
                    |> Select.Request.withDelay 200
                    |> Select.Request.withMinLength 4
                )
                SelectMsg
                subMsg
                model.select
                |> Tuple.mapFirst (\select -> { model | select = select })

Request