CP-49158: Event.next is deprecated: increase delays

No feature flag, because this is a deprecated API. Clients that wants the best performance should've used Event.from. Signed-off-by: Edwin Török <[email protected]>
edwintorok · Dec 10, 2024 · ab75aea · ab75aea
1 parent 388cbe7
commit ab75aea
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/ocaml/xapi/xapi_globs.ml b/ocaml/xapi/xapi_globs.ml
@@ -1105,7 +1105,8 @@ let event_from_task_delay, event_from_task_entry =
     ~delay_between:Mtime.Span.(50 * ms)
 
 let event_next_delay, event_next_entry =
-  make_batching "event_next" ~delay_before:Mtime.Span.zero
+  make_batching "event_next"
+    ~delay_before:Mtime.Span.(200 * ms)
     ~delay_between:Mtime.Span.(50 * ms)
 
 let xapi_globs_spec =