a good experience for dates.

src/cljs/auto_ap/forms/builder.cljs

@@ -67,15 +67,18 @@
   (r/create-element FormScopeProvider #js {:value scope}
                     (r/as-element (into [:<>]
                                         (r/children (r/current-component))))))
-(defn vertical-control [{:keys [is-small?]}]
+(defn vertical-control [{:keys [is-small? required?]}]
   (let [[label & children] (r/children (r/current-component))]
     [:> Consumer {}
      (fn [consume]
        (r/as-element
          [:div.field
-          (when label (if (or (aget consume "fullwidth?")
-                              is-small?) [:p.help label]
-                          [:label.label label]))
+          (if (aget consume "fullwidth?")
+            [:p.help label]
+            [:label.label
+             (if required?
+               [:span label [:span.has-text-danger " *"]]
+               label)])
           (into [:div.control ] children)]))]))
 
 (defn field []