adding new clients improvement more.

This commit is contained in:
Bryce Covert
2019-02-16 18:35:44 -08:00
parent 193a46e12c
commit b697107a7f
7 changed files with 10700 additions and 176 deletions

10525
resources/public/css/bulma.css vendored Normal file

File diff suppressed because it is too large Load Diff

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

View File

@@ -146,7 +146,7 @@ nav.navbar .navbar-item.is-active {
font-weight: 700; font-weight: 700;
} }
.aside .main { .aside .main {
padding: 40px; padding: 40px 40px 40px 30px;
color: #6F7B7E; color: #6F7B7E;
} }

View File

@@ -7,7 +7,7 @@
<title>Integreat</title> <title>Integreat</title>
<link rel="stylesheet" href="https://cdnjs.cloudflare.com/ajax/libs/font-awesome/4.7.0/css/font-awesome.min.css" integrity="sha256-eZrrJcwDc/3uDhsdt61sL2oOBY362qM3lon1gyExkL0=" crossorigin="anonymous" /> <link rel="stylesheet" href="https://cdnjs.cloudflare.com/ajax/libs/font-awesome/4.7.0/css/font-awesome.min.css" integrity="sha256-eZrrJcwDc/3uDhsdt61sL2oOBY362qM3lon1gyExkL0=" crossorigin="anonymous" />
<link href="/css/font.min.css" rel="stylesheet"> <link href="/css/font.min.css" rel="stylesheet">
<link rel="stylesheet" href="/css/bulma.min.css" integrity="sha256-HEtF7HLJZSC3Le1HcsWbz1hDYFPZCqDhZa9QsCgVUdw=" crossorigin="anonymous" /> <link rel="stylesheet" href="/css/bulma.min.css" />
<link rel="stylesheet" href="/css/bulma-calendar.min.css" /> <link rel="stylesheet" href="/css/bulma-calendar.min.css" />
<link rel="stylesheet" href="/css/bulma-badge.min.css" /> <link rel="stylesheet" href="/css/bulma-badge.min.css" />
<link rel="stylesheet" href="/css/animate.css" /> <link rel="stylesheet" href="/css/animate.css" />

View File

@@ -90,7 +90,7 @@
(fn [{:keys [visible?]} & children] (fn [{:keys [visible?]} & children]
[css-transition-group {:in visible? :class-names {:exitDone "bounce animated" :exit "fadeOutRight animated" :enter "fadeInRight animated"} :timeout 300 :onEnter (fn [] (reset! final-state true )) :onExited (fn [] (reset! final-state false))} [css-transition-group {:in visible? :class-names {:exitDone "bounce animated" :exit "fadeOutRight animated" :enter "fadeInRight animated"} :timeout 300 :onEnter (fn [] (reset! final-state true )) :onExited (fn [] (reset! final-state false))}
(if (or @final-state visible?) (if (or @final-state visible?)
[:div.aside [:aside {:class "column is-4 aside menu hero is-fullheight"}
[:div.sub-main children]] [:div.sub-main children]]
[:div])]))) [:div])])))
@@ -100,10 +100,10 @@
[:div [:div
[navbar ap] [navbar ap]
[:div {:class "columns ", :id "mail-app"} [:div {:class "columns ", :id "mail-app"}
[:aside {:class "column is-narrow aside menu hero is-fullheight"} [:aside {:class "column aside menu hero is-2"}
[:div.main.left-nav [:div.main.left-nav
side-bar]] side-bar]]
[:div {:class "column messages hero is-fullheight", :id "message-feed"} [:div {:class "column messages hero is-fullheight ", :id "message-feed"}
^{:key (str "active-page-" (:name client))} ^{:key (str "active-page-" (:name client))}
[:div.inbox-messages main]] [:div.inbox-messages main]]
[appearing-side-bar {:visible? right-side-bar-visible?} right-side-bar]] [appearing-side-bar {:visible? right-side-bar-visible?} right-side-bar]]

View File

@@ -372,10 +372,9 @@
(defn new-client-form [] (defn new-client-form []
(let [new-client (:new-client @(re-frame/subscribe [::subs/admin])) (let [new-client (:new-client @(re-frame/subscribe [::subs/admin]))
error (:error (:client @(re-frame/subscribe [::subs/admin])))] error (:error (:client @(re-frame/subscribe [::subs/admin])))]
[:div
[:form [:form
[:section.section {:style {:padding-bottom "0.75em" :padding-top "0.75em"}} [:section.section {:style {:padding-bottom "0.75em" :padding-top "0.75em"}}
[:h1.title "Add client"] [:h1.title.is-2 "Add client"]
[:div.field [:div.field
[:label.label "Name"] [:label.label "Name"]
[:div.control [:div.control
@@ -546,7 +545,7 @@
"" ""
"disabled") "disabled")
:on-click (dispatch-event [::save-new-client]) :on-click (dispatch-event [::save-new-client])
:class (str @(re-frame/subscribe [::loading-class ::save-client]) (when error " animated shake"))} "Save"]]])) :class (str @(re-frame/subscribe [::loading-class ::save-client]) (when error " animated shake"))} "Save"]]))
(defn admin-clients-page [] (defn admin-clients-page []
(let [{:keys [adding-client?]} @(re-frame/subscribe [::subs/admin])] (let [{:keys [adding-client?]} @(re-frame/subscribe [::subs/admin])]