summaryrefslogtreecommitdiffstats
path: root/cvs2cl.pl
diff options
context:
space:
mode:
Diffstat (limited to 'cvs2cl.pl')
-rw-r--r--cvs2cl.pl16
1 files changed, 8 insertions, 8 deletions
diff --git a/cvs2cl.pl b/cvs2cl.pl
index 7d1f5f0..e633a5e 100644
--- a/cvs2cl.pl
+++ b/cvs2cl.pl
@@ -822,17 +822,17 @@ sub derive_change_log ()
foreach my $time (sort {$main::a <=> $main::b} (keys %$timehash))
{
my $msghash = $timehash->{$time};
- while (my ($msg,$qunklist) = each %$msghash)
+ while (my ($msg,$quntdelist) = each %$msghash)
{
my $stamptime = $stamptime{$msg};
if ((defined $stamptime)
and (($time - $stamptime) < $Max_Checkin_Duration)
and (defined $changelog{$stamptime}{$author}{$msg}))
{
- push(@{$changelog{$stamptime}{$author}{$msg}}, @$qunklist);
+ push(@{$changelog{$stamptime}{$author}{$msg}}, @$quntdelist);
}
else {
- $changelog{$time}{$author}{$msg} = $qunklist;
+ $changelog{$time}{$author}{$msg} = $quntdelist;
$stamptime{$msg} = $time;
}
}
@@ -941,14 +941,14 @@ sub derive_change_log ()
# We sort here to enable predictable ordering for the testing porpoises
for my $msg (sort keys %$mesghash)
{
- my $qunklist = $mesghash->{$msg};
+ my $quntdelist = $mesghash->{$msg};
## MJP: 19.xii.01 : Exclude @ignore_tags
for my $ignore_tag (keys %ignore_tags) {
next FOOBIE
if grep($_ eq $ignore_tag, map(@{$_->{tags}},
grep(defined $_->{tags},
- @$qunklist)));
+ @$quntdelist)));
}
## MJP: 19.xii.01 : End exclude @ignore_tags
@@ -957,10 +957,10 @@ sub derive_change_log ()
next FOOBIE
if !grep(exists $show_tags{$_}, map(@{$_->{tags}},
grep(defined $_->{tags},
- @$qunklist)));
+ @$quntdelist)));
}
- my $files = &pretty_file_list ($qunklist);
+ my $files = &pretty_file_list ($quntdelist);
my $header_line; # date and author
my $body; # see below
my $wholething; # $header_line + $body
@@ -1014,7 +1014,7 @@ sub derive_change_log ()
# performed. Files which were added have no line change
# indicator, whereas deleted files have state dead.
#
- foreach $qunk ( @$qunklist )
+ foreach $qunk ( @$quntdelist )
{
if ( "dead" eq $qunk->{'state'})
{