Lines Matching refs:old
86 my ($new, $old, $mode) = @_;
90 my @merged = @$old;
91 my %look = map { $_ => 1 } @$old;
120 foreach my $e (@$old) {
154 my ($new, $old, $mode) = @_;
162 if (!defined($old) && !defined($new)) {
168 if (defined($old)) {
169 push(@merged, @$old);
178 $lastmerged = $old;
234 my ($new, $old, $mode) = @_;
246 push(@merged, @$old);
247 %oldhash = map { $_->{'name'} => $_ } @$old;
284 foreach $oldattrib (@$old) {
324 push(@merged, @$old);
325 %oldhash = map { $_->{'name'} => $_ } @$old;