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

Opam_graph: UI: More informative info box on direct deps

Browse source
This commit is contained in:
rand00 2022-01-12 15:59:22 +01:00
parent 6f9b90eff9
commit c985ecc156
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/opam_graph.ml
View file

@ -315,7 +315,8 @@ line {
deps_w_positions |> List.map (fun ((dep, pos), layer2_deps) -> deps_w_positions |> List.map (fun ((dep, pos), layer2_deps) ->
let radius = root_radius *. 0.7 let radius = root_radius *. 0.7
and text = and text =
sprintf "%s\nDependencies: %d" sprintf "Direct dependency: %s\nDependencies: %d"
(*< goto choose between transitive/direct*)
dep.name (List.length layer2_deps) dep.name (List.length layer2_deps)
and classes = [ dep.name; "direct_dep" ] in and classes = [ dep.name; "direct_dep" ] in
make_node ~pos ~radius ~text ~classes make_node ~pos ~radius ~text ~classes