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

cleaning up dialog.

Browse Source
This commit is contained in:
Bryce Covert
2018-04-05 09:26:39 -07:00
parent 154b2a214b
commit 1045514916
1 changed files with 23 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

37
src/cljs/auto_ap/views/pages/admin/companies.cljs
View File

@@ -49,21 +49,30 @@
(str "Edit " (:name editing-company))]
[:button.delete {:on-click (fn [] (re-frame/dispatch [::events/edit-company nil]))}]]
[:section.modal-card-body
[:label {:for "company-name"} "Name"]
[:input#company-name.input {:type "text" :value (:name editing-company)
:on-change (fn [e]
(re-frame/dispatch [::events/change-editing-company [:name]
(.. e -target -value)]))}]
[:div.field
[:label.label "Name"]
[:div.control
[:input#company-name.input {:type "text" :value (:name editing-company)
:on-change (fn [e]
(re-frame/dispatch [::events/change-editing-company [:name]
(.. e -target -value)]))}]]]
[:label {:for "email"} "Email"]
[:input#email.input {:type "email"
:value (:email editing-company)
:on-change (fn [e]
(re-frame/dispatch [::events/change-editing-company [:email]
(.. e -target -value)]))}]
[:div.control
[:label {:for "check"} "Send invoice reminders?"
[:input#check.checkbox {:type "checkbox" :value (:send-reminders editing-company)}]]]
[:div.field
[:label.label "Email"]
[:div.control
[:input#email.input {:type "email"
:value (:email editing-company)
:on-change (fn [e]
(re-frame/dispatch [::events/change-editing-company [:email]
(.. e -target -value)]))}]]]
[:div.field
[:div.control
[:label.radio
[:input {:type "radio" :name "schedule"}]
"Send Invoice Reminders Weekly"]
[:label.radio
[:input {:type "radio" :name "schedule"}]
"Do not send invoice reminders"]]]