robur/opam-graph
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Opam_graph: Todo-comment for a more useful sharing-coloring, excluding 'ocaml' + 'dune' from max-value calc

Browse source
This commit is contained in:
rand00 2022-03-18 13:15:49 +01:00
parent 0668da34bf
commit 1f3513e1ee
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/opam_graph.ml
View file

@ -774,6 +774,9 @@ svg {
let make_deps_sharing_css (sharing_stats:assoc_stats) = let make_deps_sharing_css (sharing_stats:assoc_stats) =
let max_count = let max_count =
SMap.fold SMap.fold
(*> todo: exclude a certain set of pkgs from being taken into consideration here
.. and remember to limit their following pct-count too
*)
(fun _pkg count max_count -> Int.max max_count count) (fun _pkg count max_count -> Int.max max_count count)
sharing_stats 0 sharing_stats 0
|> float |> float