   (assoc row omut-row-key omut-row-app-state))
 
 (defn omut-row-if-not-init-init!! [app]
-  (om/transact! app omut-row-key
-                (fn [app]
-                  (if (omut-row-key app)
-                    app
-                    (omut-row-init app)))))
+  (om/transact!
+   app
+   (fn [app]
+     (if (omut-row-key app)
+       app
+       (omut-row-init app)))))
 
 (defn omut-row-row [row]
   (dissoc row omut-row-key))

;;**************************************************************************************************


(defn text-collapser [app owner {k :k}]
  (reify
    om/IWillMount
    (will-mount [_]

                 text))))))

;; END Long text collapser
;;..................................................................................................

;;**************************************************************************************************
;;* BEGIN collapser
;;* tag: <collapser>
;;*
;;* description: Свертыватель
;;*
;;**************************************************************************************************

                                        ;TODO: Перемиеноывать в ui-hidder
(defn ui-collapser [app text k show? collapsed-body]
  (dom/p #js {:style #js {:display (if show? "" "none")}}
         (ui-button {:text text
                     :type :info
                     :active? (not (omut-row-collapsed? @app k))
                     :on-click #(omut-row-set-collapsed-not!! app k)})

         (dom/div #js {:style #js {:display (if (omut-row-collapsed? @app k) "none" "")}}
                  collapsed-body)))




;; END collapser
;;..................................................................................................


