diff --git a/src/cljs/auto_ap/views/pages/admin/companies.cljs b/src/cljs/auto_ap/views/pages/admin/companies.cljs index 1fdc04d8..6e1c1e83 100644 --- a/src/cljs/auto_ap/views/pages/admin/companies.cljs +++ b/src/cljs/auto_ap/views/pages/admin/companies.cljs @@ -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"]]]