summaryrefslogtreecommitdiffstats
path: root/bin
diff options
context:
space:
mode:
authorPatrick McDermott <patrick.mcdermott@libiquity.com>2019-06-27 21:04:03 (EDT)
committer Patrick McDermott <patrick.mcdermott@libiquity.com>2019-06-27 23:23:44 (EDT)
commitf3efc9915f1daa1b5a627babc945d364b6592a6d (patch)
tree941c2870e17892baf5e432b6d1bd5f2e5610dded /bin
parenta4f616cef42aedb7db142376b1e33c8480149280 (diff)
Lighten deps on multiple possible source packages
For example, the lilo binary package depends on config-lilo, currently built by the config-ao751h, config-dimension2400, and config-x60 source packages. Lighten the color of the dependencies of the lilo source package on these config-* packages.
Diffstat (limited to 'bin')
-rwxr-xr-x[-rw-r--r--]bin/depsdot11
1 files changed, 8 insertions, 3 deletions
diff --git a/bin/depsdot b/bin/depsdot
index a7be98f..79c4a53 100644..100755
--- a/bin/depsdot
+++ b/bin/depsdot
@@ -61,16 +61,21 @@ sub main
STDOUT->print("digraph deps {\n");
foreach my $dep_bin (keys(%rdeps_graph)) {
foreach my $src (keys(%{$rdeps_graph{$dep_bin}})) {
- foreach my $dep_src (keys(%{$bin_src_map{$dep_bin}})) {
+ my @dep_srcs = keys(%{$bin_src_map{$dep_bin}});
+ foreach my $dep_src (@dep_srcs) {
next if $dep_src eq $src;
- $deps_graph{$src}{$dep_src} = 1;
+ $deps_graph{$src}{$dep_src} = scalar(@dep_srcs);
}
}
}
foreach my $src (sort(keys(%deps_graph))) {
foreach my $dep_src (sort(keys(%{$deps_graph{$src}}))) {
+ my $attr = '';
+ if ($deps_graph{$src}{$dep_src} gt 1) {
+ $attr = ' [color="#808080"]';
+ }
STDOUT->print("\t\"" . $src . '" -> "' . $dep_src .
- "\";\n");
+ '"' . $attr . ";\n");
}
}
STDOUT->print("}\n");