Skip to content

Commit

Permalink
refactor: remove unnecessary wrapper divs
Browse files Browse the repository at this point in the history
  • Loading branch information
Macroz committed Mar 6, 2019
1 parent 993c533 commit 0428756
Showing 1 changed file with 7 additions and 9 deletions.
16 changes: 7 additions & 9 deletions src/cljs/rems/application.cljs
Expand Up @@ -573,13 +573,11 @@
[:span ": " (str/join ", " targets)])]
(when comment [:div comment])]])

(defn- event-groups-view [event-groups]
[:div
(into [:div]
(for [group event-groups]
^{:key group} [:div.group
(for [e group]
^{:key e} [event-view e])]))])
(defn- render-event-groups [event-groups]
(for [group event-groups]
^{:key group} [:div.group
(for [e group]
^{:key e} [event-view e])]))

(defn- application-header [state phases-data events]
(let [;; the event times have millisecond differences, so they need to be formatted to minute precision before deduping
Expand All @@ -603,9 +601,9 @@
[:div.mb-3 {:class (str "state-" (if (keyword? state) (name state) state))} (phases phases-data)]
[:h4 (text :t.form/events)]
(when-let [g (first event-groups)]
[event-groups-view [g]])]
(render-event-groups [g]))]
:collapse (when-let [g (seq (rest event-groups))]
[event-groups-view g])}]))
(render-event-groups g))}]))

(defn member-info
"Renders a applicant, member or invited member of an application
Expand Down

0 comments on commit 0428756

Please sign in to comment.