gered/mtgcoll
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

add generic modal yes/no confirmation component

Browse source
This commit is contained in:
Gered 2016-07-31 15:57:17 -04:00
parent 10713fa58f
commit 53ab0dd10c
1 changed files with 21 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

22
src/mtgcoll/client/components/utils.cljs
View file

@ -119,4 +119,24 @@
(let [value (string/trim (str @current-value))]
(reset! editing? false)
(if on-update (on-update (if (string/blank? value) nil value)))))
:on-change #(reset! current-value (get-field-value %))}])])))
:on-change #(reset! current-value (get-field-value %))}])])))
(defn confirm-modal
[visibility-atom {:keys [title body yes-label no-label on-yes on-no]}]
[bs/Modal
{:show (boolean @visibility-atom)
:on-hide #(reset! visibility-atom false)}
[bs/Modal.Header [bs/Modal.Title title]]
[bs/Modal.Body body]
[bs/Modal.Footer
[bs/Button
{:bsStyle "primary"
:on-click (fn [_]
(on-yes)
(reset! visibility-atom false))}
(or yes-label "Yes")]
[bs/Button
{:on-click (fn [_]
(if on-no (on-no))
(reset! visibility-atom false))}
(or no-label "No")]]])