notid/integreat
1
0
Fork 0
Code Issues Pull Requests 2 Actions Packages Projects Releases Wiki Activity

UI improvements.

Browse Source
This commit is contained in:
BC
2018-06-21 23:57:44 -07:00
parent e4e2525ce9
commit 1ac76d4ad1
5 changed files with 26 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

34
src/cljs/auto_ap/views/components/modal.cljs
View File

@@ -25,21 +25,27 @@
(let [{:keys [visible? saving?]} @(re-frame/subscribe [::subs/modal-state id])]
(when visible?
(-> [modal {:title title
:foot [:button.button.is-primary {:on-click (fn []
(re-frame/dispatch [::events/modal-status id {:saving? true}])
(re-frame/dispatch save-event))
:disabled (cond saving?
"disabled"
:foot [:input.button.is-primary {
:type "submit"
:form id
:disabled (cond saving?
"disabled"
(not can-submit?)
"disabled"
(not can-submit?)
"disabled"
:else
"")
:class (when saving?
"is-loading")}
[:span action-text]]
:else
"")
:class (when saving?
"is-loading")
:value action-text}
]
:id id
:hide-event [::events/modal-status id {:visible? false}]}]
(into (r/children (r/current-component)) )
:hide-event [::events/modal-status id {:visible? false}]}
(into [:form {:id id
:on-submit (fn [e]
(.preventDefault e)
(re-frame/dispatch [::events/modal-status id {:saving? true}])
(re-frame/dispatch save-event))}]
(r/children (r/current-component)) )]
(into [(when saving? [:div.is-overlay {:style {"backgroundColor" "rgba(150,150,150, 0.5)"}}])])))))