summaryrefslogtreecommitdiffstats
path: root/src/build
diff options
context:
space:
mode:
authorAdam Muhle <armuhle@us.ibm.com>2011-08-15 11:39:55 -0500
committerA. Patrick Williams III <iawillia@us.ibm.com>2011-08-16 08:04:53 -0500
commitab9e15e2e44eb52d4d0aa3602498a62db0cc0c37 (patch)
tree9df07b82a97f8fac63506e938493941332aca90b /src/build
parent5b4ea4d127be9898ae1aada5df6b06e67ec47086 (diff)
downloadtalos-hostboot-ab9e15e2e44eb52d4d0aa3602498a62db0cc0c37.tar.gz
talos-hostboot-ab9e15e2e44eb52d4d0aa3602498a62db0cc0c37.zip
update mkpnortoc.pl to handle new XML text node name (#text) in perl 5.10.1 and newer
Change-Id: Ib8cfd322dbeed97cb68850c8f59833d4e1000919 Reviewed-on: http://gfw160.austin.ibm.com:8080/gerrit/256 Tested-by: Jenkins Server Reviewed-by: Daniel M. Crowell <dcrowell@us.ibm.com> Reviewed-by: A. Patrick Williams III <iawillia@us.ibm.com>
Diffstat (limited to 'src/build')
-rwxr-xr-xsrc/build/tocgen/mkpnortoc.pl8
1 files changed, 5 insertions, 3 deletions
diff --git a/src/build/tocgen/mkpnortoc.pl b/src/build/tocgen/mkpnortoc.pl
index 5a3d95d15..f4e5464f5 100755
--- a/src/build/tocgen/mkpnortoc.pl
+++ b/src/build/tocgen/mkpnortoc.pl
@@ -13,7 +13,7 @@ use XML::LibXML;
use File::Basename;
my $programName = File::Basename::basename $0;
-my $g_trace = 0; # 1 -> enable traces
+my $g_trace = 0; # >0 enable traces
$tocDataFile = "";
$tocOutFile = "";
@@ -163,9 +163,10 @@ sub parseTocEntry
{
last;
}
- elsif($curSibling->nodeName eq "text")
+ elsif(($curSibling->nodeName eq "text") ||
+ ($curSibling->nodeName eq "#text"))
{
- #print "skipping ".$curSibling->nodeName."\n";
+ trace(1, "ignoring ".$curSibling->nodeName);
}
elsif($curSibling->nodeName eq "length")
{
@@ -174,6 +175,7 @@ sub parseTocEntry
}
else
{
+ trace(1, "Parsing ".$curSibling->nodeName);
$fieldLen = writeElementToBinFile($i_FILEHANDLE, $curSibling);
$sumFieldLen = $sumFieldLen + $fieldLen;
OpenPOWER on IntegriCloud