X-Git-Url: https://git.openssl.org/gitweb/?a=blobdiff_plain;f=util%2Fclean-depend.pl;h=d3525b0ed06967b1309fd15f7c52fa242c45f9d8;hb=2097a17c576f2395a10b05f14490688bc5f45a07;hp=8e27aaae5e85d81eb4de2fabcbc6d93bc322042c;hpb=75e98d0563ccb7710b099678043d28cfc35cbb57;p=openssl.git diff --git a/util/clean-depend.pl b/util/clean-depend.pl index 8e27aaae5e..d3525b0ed0 100755 --- a/util/clean-depend.pl +++ b/util/clean-depend.pl @@ -34,8 +34,17 @@ foreach $file (sort keys %files) { my $dep; my $origfile=$file; $origfile=~s/\.o$/.c/; + $file=~s/^\.\///; push @{$files{$file}},$origfile; - foreach $dep (sort @{$files{$file}}) { + my $prevdep=""; + + # Remove leading ./ before sorting + my @deps = map { $_ =~ s/^\.\///; $_ } @{$files{$file}}; + + foreach $dep (sort @deps) { + $dep=~s/^\.\///; + next if $prevdep eq $dep; # to exterminate duplicates... + $prevdep = $dep; $len=0 if $len+length($dep)+1 >= 80; if($len == 0) { print "\n$file:";