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 | |
parent | 6709a7967968891dd3e3c43bfe16eaf9ea39256c (diff) | |
download | drakx-backup-do-not-use-46ca3840aa97b3e0bd75518907680a7c9c116252.tar drakx-backup-do-not-use-46ca3840aa97b3e0bd75518907680a7c9c116252.tar.gz drakx-backup-do-not-use-46ca3840aa97b3e0bd75518907680a7c9c116252.tar.bz2 drakx-backup-do-not-use-46ca3840aa97b3e0bd75518907680a7c9c116252.tar.xz drakx-backup-do-not-use-46ca3840aa97b3e0bd75518907680a7c9c116252.zip |
add AUTHOR environment option for my warly reports
-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; |