(defn
reload-css-files*
[deferred f-datas on-cssload]
(->
deferred
(utils/mapConcatD reload-css-file f-datas)
(utils/liftContD
(fn
[f-datas' fin]
(let
[loaded-f-datas (filter :loaded f-datas')]
(on-cssload-custom-event loaded-f-datas)
(when (fn? on-cssload) (on-cssload loaded-f-datas)))
(fin)))))