qi-hardware/wernermisc
1
0
Fork 0
mirror of git://projects.qi-hardware.com/wernermisc.git synced 2024-11-22 03:20:37 +02:00
Code

bin/authors: only include files that still exist

Browse Source
This commit is contained in:
Werner Almesberger 2013-09-28 21:15:56 -03:00
parent 4c991b767c
commit a2a7293ef6
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
bin/authors
View File

@ -13,6 +13,13 @@
$WIDTH = 79; $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 |") || open(LOG, "git log --format='%an <%ae>' --name-only --no-merges |") ||
die "popen log"; die "popen log";
while (<LOG>) { while (<LOG>) {
@ -22,13 +29,13 @@ while (<LOG>) {
undef $last; undef $last;
next; next;
} }
if (defined $last) { if (defined $e{$last}) {
push @{ $f{$last} }, $a; push @{ $f{$last} }, $a;
$a{$a} = 1; $a{$a} = 1;
} }
$last = $_; $last = $_;
} }
if (defined $last) { if (defined $e{$last}) {
push @{ $f{$last} }, $a; push @{ $f{$last} }, $a;
$a{$a} = 1; $a{$a} = 1;
} }