 ;;**************************************************************************************************
 
 (defn ui-glyphicon [name & [class+ size]]
-  (dom/span #js {:className (str "glyphicon glyphicon-" name " " (or class+ ""))
-                 :style #js {:fontSize size}
+  (dom/span #js {:className   (str "glyphicon glyphicon-" name " " (or class+ ""))
+                 :style       #js {:fontSize size}
                  :aria-hidden "true"}))
 
 ;; END icons

                                  update-fn
                                  success-fn
                                  accept]
                           :or {uri "/file-uploder/uri"
                                accept "*.*"}}]
  (reify
    om/IInitState
    (init-state [_]
      {:chan-upload (chan)
       :form-id (uniq-id "file-uploder-form")
       :uploader-id (uniq-id "uploder")
       :in-progress false})
    om/IWillMount
    (will-mount [this]
      (let [{:keys[chan-upload form-id uploader-id]} (om/get-state own)]
        (go
          (while true
            (let [_ (<! chan-upload)]

        (omut-row-if-not-init-init!! app))
      om/IRender
      (render [_]
        (apply dom/tr #js {:className (if (omut-row-selected? @app) "info" "")
                           :onClick   (partial on-click app)
                           ;;:onTouchEnd (partial on-click app) ;; недает проматывать
                           }
               (app-to-tds-seq-fn app) )))))
