@colisweb/rescript-toolkit 5.49.0 → 5.49.2

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@colisweb/rescript-toolkit",
-  "version": "5.49.0",
+  "version": "5.49.2",
   "type": "module",
   "scripts": {
     "clean": "rescript clean",

package/src/form/Reform.res

@@ -189,7 +189,7 @@ module Make = (Config: Config) => {
   let use = (
     ~initialState,
     ~schema=[]: Validation.schema,
-    ~beforeSubmit: option<state => bool>=None,
+    ~beforeSubmit: state => bool=_ => false,
     ~onSubmit,
     ~onSubmitFail=ignore,
     ~i18n: ReSchemaI18n.t=ReSchemaI18n.default,
@@ -200,8 +200,7 @@ module Make = (Config: Config) => {
       (state, action) => {
         switch action {
         | Submit =>
-          state.formState == Submitting ||
-            beforeSubmit->Option.mapWithDefault(false, fn => fn(state))
+          state.formState == Submitting || beforeSubmit(state)
             ? NoUpdate
             : UpdateWithSideEffects(
                 {...state, formState: Submitting},

package/src/ui/Toolkit__Ui_Timeline.res

@@ -49,6 +49,7 @@ type contentParams = {index: int}
 type timelinePointExtras = {
   className?: string,
   content?: contentParams => React.element,
+  onClick?: unit => unit,
   popoverContent?: React.element,
   popoverContentOptions?: Radix.Popover.Content.options,
 }
@@ -301,6 +302,7 @@ module Timeline = {
           | None =>
             <div
               className={"w-full h-[--markerHeight] text-center font-semibold text-sm"}
+              onClick={_ => extras.onClick->Option.forEach(fn => fn())}
               style={{
                 "--markerHeight": switch marker {
                 | Cluster(_) => markerWidth +. 10.
@@ -313,6 +315,7 @@ module Timeline = {
             <Toolkit__Ui_Popover
               triggerAsChild={true}
               trigger={<div
+                onClick={_ => extras.onClick->Option.forEach(fn => fn())}
                 className={"w-full h-[--markerHeight] cursor-pointer text-center font-semibold text-sm"}
                 style={{
                   "--markerHeight": switch marker {