blob: 326d21cc8c827fc1f8f888e5551393bca4d8db79 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
#!/bin/sh
git log --reverse --format='%aN <%aE>' | perl -we '
BEGIN {
%seen = (), @authors = ();
}
while (<>) {
next if $seen{$_};
$seen{$_} = push @authors, $_;
}
END {
print "# Authors sorted by whether or not they'\''re me\n";
print @authors;
}
' > AUTHORS
|