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

Builder-viz: Changed sharing-stats to be based on direct deps instead of transitive

Browse source
This commit is contained in:
rand00 2022-03-18 13:16:26 +01:00
parent 34a8bf9160
commit 462859f4fb
1 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
bin/visualizations/builder_viz.ml
View file

@ -75,11 +75,10 @@ let print_dependencies_html file =
let module G = Opam_graph in let module G = Opam_graph in
let switch = read_file file in let switch = read_file file in
let data = OpamFile.SwitchExport.read_from_string switch in let data = OpamFile.SwitchExport.read_from_string switch in
let transitive = false in let graph = G.Ui.dependencies ~transitive:false data in
let graph = G.Ui.dependencies ~transitive data in
let sharing_stats = let sharing_stats =
data data
|> G.dependencies ~transitive:true |> G.dependencies ~transitive:false
|> G.calc_sharing_stats in |> G.calc_sharing_stats in
let override_css = {| let override_css = {|
.deps-svg-wrap { .deps-svg-wrap {