diff options
Diffstat (limited to 'modules/conf/confmaker.pl')
-rwxr-xr-x | modules/conf/confmaker.pl | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/modules/conf/confmaker.pl b/modules/conf/confmaker.pl index e2c411d..66be5b8 100755 --- a/modules/conf/confmaker.pl +++ b/modules/conf/confmaker.pl @@ -136,6 +136,9 @@ my $hs = HTML::Strip->new(); my $doc_text = new Sword::SWBuf($hs->parse($doc->toString())); ## obtain name, type and language +for my $root ($doc->findnodes(q{/header/})) { + $root->unbindNode; +} my @elements = $doc->getElementsByTagName('osisText'); @@ -180,6 +183,12 @@ if (!(exists $version{$v11n})) { print STDERR "\n"; exit(-1); } +#remove <header> tag and child nodes as its presence can cause confusion +for my $header ($doc->getElementsByTagName('header')) { + $header->unbindNode; +} + + ##GlobalOptionsFilter - prepare @@ -280,6 +289,8 @@ print "SwordVersionDate=".`date +"%F"`; print "Lang=".$doc_lang."\n"; + + foreach (@doc_features) { if ($doc_has_feature{$_}) { print "GlobalOptionFilter=".$doc_filters{$_}."\n" |