@colisweb/rescript-toolkit 4.8.1 → 4.8.2

package/package.json

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

package/src/form/Reform.res

@@ -180,7 +180,7 @@ module Make = (Config: Config) => {
     ~onSubmit,
     ~onSubmitFail=ignore,
     ~i18n=?,
-    ~validationStrategy=OnDemand,
+    ~validationStrategy=OnChange,
     (),
   ) => {
     let intl = useIntl()
@@ -257,6 +257,8 @@ module Make = (Config: Config) => {
                       field,
                       (Valid: fieldState),
                     ))
+
+                  self.send(SetFormState(Valid))
                   self.send(SetFieldsState(newFieldsState))
                   submit ? self.send(Submit) : ()
                 }
@@ -332,16 +334,25 @@ module Make = (Config: Config) => {
             ),
           })
         | FieldArrayUpdateByIndex(field, value, index) =>
-          Update({
-            ...state,
-            values: Config.set(
-              state.values,
-              field,
-              Config.get(state.values, field)->Belt.Array.mapWithIndex((i, currentValue) =>
-                i == index ? value : currentValue
+          UpdateWithSideEffects(
+            {
+              ...state,
+              values: Config.set(
+                state.values,
+                field,
+                Config.get(state.values, field)->Belt.Array.mapWithIndex((i, currentValue) =>
+                  i == index ? value : currentValue
+                ),
               ),
-            ),
-          })
+            },
+            self => {
+              switch validationStrategy {
+              | OnChange => self.send(ValidateField(Field(field)))
+              | OnDemand => ()
+              }
+              None
+            },
+          )
         | SetFormState(newState) => Update({...state, formState: newState})
         | ResetForm =>
           Update({