List.filter_opt

Signed-off-by: Antonio Nuno Monteiro <[email protected]>
ocaml · Apr 1, 2024 · bdfe638 · bdfe638
1 parent d305b10
commit bdfe638
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/dune_rules/lib.ml b/src/dune_rules/lib.ml
@@ -1185,7 +1185,7 @@ end = struct
         | Not_found -> handle_resolve_result ~super db Not_found >>| Option.some
         | Hidden { lib = info; reason = hidden; path = _ } ->
           resolve_hidden db ~info hidden >>| Option.some)
-      >>| List.filter_map ~f:Fun.id
+      >>| List.filter_opt
       >>| (function
        | [] -> Status.Not_found
        | [ status ] -> status