diff --git a/bin/authors b/bin/authors index 423645c..a8b43fa 100755 --- a/bin/authors +++ b/bin/authors @@ -13,6 +13,13 @@ $WIDTH = 79; +open(LOG, "git ls-files |") || die "popen ls-files"; +while () { + chop; + $e{$_} = 1; +} +close LOG; + open(LOG, "git log --format='%an <%ae>' --name-only --no-merges |") || die "popen log"; while () { @@ -22,13 +29,13 @@ while () { 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; }