Accept empty params

ocaml · Apr 10, 2024 · 530c182 · 530c182
1 parent e75b8c1
commit 530c182
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/ocaml-lsp-server/src/custom_requests/req_dune_contexts.ml b/ocaml-lsp-server/src/custom_requests/req_dune_contexts.ml
@@ -15,7 +15,7 @@ module Request_params = struct
            ()
     in
     match params with
-    | None -> ()
+    | None | Some (`List [] | `Assoc []) -> ()
     | Some params ->
       let error_json = `Assoc [ ("params_received", (params :> Json.t)) ] in
       raise_invalid_params