This commit is contained in:
Bryce Covert
2020-08-22 17:14:21 -07:00
parent dc57fd7d0c
commit 25477d07f7
16 changed files with 9593 additions and 158 deletions

View File

@@ -107,7 +107,7 @@
(reduce + 0))]
[:div
[:div
[:a.button.is-primary {:on-click (dispatch-event [::add-split])} "Add split"]]
[:a.button.is-outlined {:on-click (dispatch-event [::add-split])} "Add split"]]
(form-inline {}
[:table.table
[:thead

View File

@@ -57,7 +57,7 @@
(let [per-page 100
max-buttons 5
buttons-before (Math/floor (/ max-buttons 2))
total-pages (Math/ceil (/ total per-page))
total-pages (Math/max 1 (Math/ceil (/ total per-page)))
current-page (Math/floor (/ start per-page))
first-page-button (bound 0 (- current-page buttons-before) (- total-pages max-buttons))
all-buttons (into [] (for [x (range total-pages)]

View File

@@ -91,7 +91,8 @@
menu (re-frame/subscribe [::subs/menu])
client-search @(re-frame/subscribe [::client-search])
is-initial-loading @(re-frame/subscribe [::subs/is-initial-loading?])]
[:nav {:class "navbar has-shadow is-fixed-top"}
[:nav {:class "navbar has-shadow is-fixed-top is-grey"}
[:div {:class "container"}
[:div {:class "navbar-brand"}
[:a {:class "navbar-item", :href "../"}
@@ -161,7 +162,10 @@
(re-frame/dispatch [::events/swap-client client]))
} name])]])])]
(when-not is-initial-loading
[login-dropdown])]]))
[login-dropdown])]
]))
(defn footer []

View File

@@ -82,12 +82,12 @@
[:div.notification.is-warning (:message (first (:error status)))]]
foot]
[:footer.modal-card-foot
[:div
[:div
[appearing {:visible? (= :error (:state status))
:timeout 200
:enter-class "appear"
:exit-class "disappear"}
[:div.notification.is-warning (:message (first (:error status)))]]
[:div.has-text-danger (:message (first (:error status)))]]
[:div.buttons
(when confirm