formatting in bulma core, collapsible header title as div

src/cljs/lernmeister/components/bulma/core.cljs

@@ -41,11 +41,11 @@
                                                                         on-change))}))))
       :reagent-render
       (fn [{:keys [field-class input-class input-size label-icon
-                   placeholder value on-change label icons expanded?
-                   disabled? tooltip autocomplete readonly? help]}]
+                  placeholder value on-change label icons expanded?
+                  disabled? tooltip autocomplete readonly? help]}]
         [:<> ;;:div.field {:class field-class}
          #_(when label
-           [:label.label {:for id} label])
+             [:label.label {:for id} label])
          [control {:icons icons
                    :expanded? expanded?}
           [:<>
@@ -66,8 +66,8 @@
            (when help
              [:div.help help])]
           #_(when label-icon
-            [icon label-icon
-             :class "is-left"])]])})))
+              [icon label-icon
+               :class "is-left"])]])})))
 
 (defn input-range
   [{:keys [field-class input-class input-size label-icon
@@ -78,8 +78,8 @@
     (reagent/create-class
      {:reagent-render
       (fn [{:keys [field-class input-class input-size label-icon
-                   placeholder value on-change label
-                   disabled? tooltip autocomplete
+                  placeholder value on-change label
+                  disabled? tooltip autocomplete
                   min max]}]
         [field {:addons? true}
          [control {:icons icons
@@ -105,35 +105,35 @@
                           :id (str id "number")}]]
           ]]
         #_[:div.columns
-         [:div.column.is-three-quarters
-          [:div.field
-           [:label.label {:for (str id "slider")}
-            label]
-           [:div.control
-            [:input.input
-             {:type "range"
-              :value value
-              :on-change #(on-change
-                           (-> % .-target .-value js/parseInt))
-              :min min
-              :max max
-              :id (str id "slider")}]]]]
-         [:div.column.is-one-quarter
-          [:div.field
-           [:label.label
-            {:for (str id "number")
-             :style {:visibility :hidden}}
-            label]
-           [:div.control
-            [:input.input {:type "number"
-                           :value value
-                           :min min
-                           :max max
-                           :placeholder (or placeholder "")
-                           :disabled disabled
-                           :on-change #(on-change
-                                        (-> % .-target .-value js/parseInt))
-                           :id (str id "number")}]]]]])})))
+           [:div.column.is-three-quarters
+            [:div.field
+             [:label.label {:for (str id "slider")}
+              label]
+             [:div.control
+              [:input.input
+               {:type "range"
+                :value value
+                :on-change #(on-change
+                             (-> % .-target .-value js/parseInt))
+                :min min
+                :max max
+                :id (str id "slider")}]]]]
+           [:div.column.is-one-quarter
+            [:div.field
+             [:label.label
+              {:for (str id "number")
+               :style {:visibility :hidden}}
+              label]
+             [:div.control
+              [:input.input {:type "number"
+                             :value value
+                             :min min
+                             :max max
+                             :placeholder (or placeholder "")
+                             :disabled disabled
+                             :on-change #(on-change
+                                          (-> % .-target .-value js/parseInt))
+                             :id (str id "number")}]]]]])})))
 
 (defn checkbox
   [{:keys [name disabled? on-change checked? label]}]
@@ -192,7 +192,7 @@
                            [:header.card-header
                             {:on-click #(swap! collapsible-state update index not)
                              :style {:cursor :pointer}}
-                            [:p.card-header-title
+                            [:div.card-header-title
                              (:label element)
                            ;;;TODO icon --[:i.material-icons (:icon element)]
                              ]