Slight bug in dependencies caused occasional unnecessary diffs. Fixed.

This commit is contained in:
Ben Laurie
2007-09-19 13:10:34 +00:00
parent 4f2b7d48b1
commit 1c90899eef
2 changed files with 6 additions and 3 deletions

View File

@@ -37,8 +37,11 @@ foreach $file (sort keys %files) {
$file=~s/^\.\///;
push @{$files{$file}},$origfile;
my $prevdep="";
foreach $dep (sort @{$files{$file}}) {
$dep=~s/^\.\///;
# Remove leading ./ before sorting
my @deps = map { $_ =~ s/^\.\///; $_ } @{$files{$file}};
foreach $dep (sort @deps) {
next if $prevdep eq $dep; # to exterminate duplicates...
$prevdep = $dep;
$len=0 if $len+length($dep)+1 >= 80;