From e6cc31f783d9dbb5bbdd34f900b554550daad56a Mon Sep 17 00:00:00 2001
From: "sgunderson@bigfoot.com" <>
Date: Wed, 6 Sep 2006 15:56:21 +0200
Subject: [PATCH] Fix yet more undefined variable errors.

---
 tests/xml-diff.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/tests/xml-diff.pl b/tests/xml-diff.pl
index 861e6a3..f7ccd8c 100644
--- a/tests/xml-diff.pl
+++ b/tests/xml-diff.pl
@@ -92,7 +92,7 @@ sub compare_attr_list {
 		my $name = $attr1->getName;
 		next if ($name =~ /^xmlns:(.*)$/);
 		
-		my ($nsuri1, undef, $lname1) = $nsup1->process_attribute_name($n1->getName);
+		my ($nsuri1, undef, $lname1) = $nsup1->process_attribute_name($attr1->getName);
 
 		if (!defined($attrs2)) {
 			# n2 has no attributes at all
@@ -102,7 +102,7 @@ sub compare_attr_list {
 
 		my $attr2_found;
 		for my $attr2 ($attrs2->getValues) {
-			my ($nsuri2, undef, $lname2) = $nsup2->process_attribute_name($n2->getName);
+			my ($nsuri2, undef, $lname2) = $nsup2->process_attribute_name($attr2->getName);
 		
 			if ($nsuri1 eq $nsuri2 && $lname1 eq $lname2) {
 				$attr2_found = $attr2;
@@ -115,7 +115,7 @@ sub compare_attr_list {
 			last;
 		}
 
-		if ($attr1->getValue ne $attr2->getValue) {
+		if ($attr1->getValue ne $attr2_found->getValue) {
 			print STDERR "Attribute $nsuri1/$lname1 has differing values\n";
 		}
 	}
-- 
2.39.2