Could we add a "file" input type?

[ClemRz]

Hi, at work we decided to use re-com to build a UI around an API.

We needed an <input type="file"/> for uploads and we had to craft our own based on re-com.input-text/input-text-base:

  (let [internal-model (reagent/atom "")
        external-model (re-frame/subscribe [::subs/external-model])]
   [re-com/input-text
    :attr {:type      "file"
           :accept    accept
           :multiple  multiple?
           :value     @internal-model
           :on-change (handler-fn
                        (let [target (-> event .-target)
                              new-val (-> target .-value)
                              files (-> target .-files)]
                          (when (not disabled?)
                            (reset! internal-model new-val)
                            (when (not= @internal-model @external-model)
                              (re-frame/dispatch [::events/external-model files])
                              (if (fn? on-change)
                                (on-change files))))))}])

It is very hacky but does the job.

Is there any plan to add one to re-com? That would be awesome!