mirror of
git://projects.qi-hardware.com/wernermisc.git
synced 2024-11-24 12:05:19 +02:00
bin/authors: only include files that still exist
This commit is contained in:
parent
4c991b767c
commit
a2a7293ef6
11
bin/authors
11
bin/authors
@ -13,6 +13,13 @@
|
||||
|
||||
$WIDTH = 79;
|
||||
|
||||
open(LOG, "git ls-files |") || die "popen ls-files";
|
||||
while (<LOG>) {
|
||||
chop;
|
||||
$e{$_} = 1;
|
||||
}
|
||||
close LOG;
|
||||
|
||||
open(LOG, "git log --format='%an <%ae>' --name-only --no-merges |") ||
|
||||
die "popen log";
|
||||
while (<LOG>) {
|
||||
@ -22,13 +29,13 @@ while (<LOG>) {
|
||||
undef $last;
|
||||
next;
|
||||
}
|
||||
if (defined $last) {
|
||||
if (defined $e{$last}) {
|
||||
push @{ $f{$last} }, $a;
|
||||
$a{$a} = 1;
|
||||
}
|
||||
$last = $_;
|
||||
}
|
||||
if (defined $last) {
|
||||
if (defined $e{$last}) {
|
||||
push @{ $f{$last} }, $a;
|
||||
$a{$a} = 1;
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user