diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2004-06-03 16:23:01 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2004-06-03 16:23:01 +0000 |
| commit | 46ca3840aa97b3e0bd75518907680a7c9c116252 (patch) | |
| tree | e89581bf7ebaca3b0b18303aeb159576f2e17aee /tools/cvslog2changelog.pl | |
| parent | 6709a7967968891dd3e3c43bfe16eaf9ea39256c (diff) | |
| download | drakx-46ca3840aa97b3e0bd75518907680a7c9c116252.tar drakx-46ca3840aa97b3e0bd75518907680a7c9c116252.tar.gz drakx-46ca3840aa97b3e0bd75518907680a7c9c116252.tar.bz2 drakx-46ca3840aa97b3e0bd75518907680a7c9c116252.tar.xz drakx-46ca3840aa97b3e0bd75518907680a7c9c116252.zip | |
add AUTHOR environment option for my warly reports
Diffstat (limited to 'tools/cvslog2changelog.pl')
| -rwxr-xr-x | tools/cvslog2changelog.pl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/tools/cvslog2changelog.pl b/tools/cvslog2changelog.pl index 9eab56884..77d67449b 100755 --- a/tools/cvslog2changelog.pl +++ b/tools/cvslog2changelog.pl @@ -17,6 +17,8 @@ while (<>) { foreach $date (reverse sort keys %l) { foreach $user (sort keys %{$l{$date}}) { + next if $ENV{AUTHOR} && $ENV{AUTHOR} ne $user; + $fuser = $users{$user} || $user; print "$date $fuser\n\n"; my %inv; |