[open-ils-commits] r7958 - trunk/Open-ILS/src/support-scripts

[svn at svn.open-ils.org]

Author: erickson
Date: 2007-11-01 11:24:26 -0400 (Thu, 01 Nov 2007)
New Revision: 7958

Modified:
   trunk/Open-ILS/src/support-scripts/settings-tester.pl
Log:
checking node type instead of nodeName, since nodeName gets upset when empty

Modified: trunk/Open-ILS/src/support-scripts/settings-tester.pl
===================================================================
--- trunk/Open-ILS/src/support-scripts/settings-tester.pl	2007-11-01 15:12:11 UTC (rev 7957)
+++ trunk/Open-ILS/src/support-scripts/settings-tester.pl	2007-11-01 15:24:26 UTC (rev 7958)
@@ -94,7 +94,8 @@
 	my $db_pw = $database->findvalue("./pw");	
 	my $osrf_xpath;
 	foreach my $node ($database->findnodes("ancestor::node()")) {
-		$osrf_xpath .= "/" . $node->nodeName unless $node->nodeName eq '#document';
+		next unless $node->nodeType == XML::LibXML::XML_ELEMENT_NODE;
+		$osrf_xpath .= "/" . $node->nodeName;
 	}
 	$output .= test_db_connect($db_name, $db_host, $db_port, $db_user, $db_pw, $osrf_xpath);
 }
@@ -109,7 +110,7 @@
 	my $driver_xpath;
 	my @driver_xpath_nodes;
 	foreach my $node ($driver_node->findnodes("ancestor::node()")) {
-		next if $node->nodeName eq "#document";
+		next unless $node->nodeType == XML::LibXML::XML_ELEMENT_NODE;
 		$driver_xpath .= "/" . $node->nodeName;
 		push @driver_xpath_nodes, $node->nodeName;
 	}