From: Bob Stayton <bobs@sagehill.net>
Date: Wed, 19 Dec 2007 21:23:30 +0000 (+0000)
Subject: Fixed bug #1850340 that added namespace to numerical character
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=b478a62ce40f88a86d56aa12c6d76102587f76c6;p=docbook-dsssl

Fixed bug #1850340 that added namespace to numerical character
references.
---

diff --git a/releasetools/xslns-build b/releasetools/xslns-build
index 0774f6187..4b3fe827e 100755
--- a/releasetools/xslns-build
+++ b/releasetools/xslns-build
@@ -46,7 +46,7 @@ my $ns = "[A-Za-z]+";
 # other names
 my $n = "[A-Za-z][A-Za-z0-9]+";
 # xml names
-my $w = "[A-Za-z][-A-Za-z0-9._]+";
+my $w = "[A-Za-z][-A-Za-z0-9._#]+";
 # docbook element names (lowercase and numbers)
 my $dbname = "[a-z][a-z0-9]+";
 
@@ -294,7 +294,7 @@ sub nsfilter {
       $attvalue = '';
     }
 
-    while ( $attvalue =~ /^(.*?)(\$$w|$w\(|$ns:$n|$w:|db:$n|\@$n:$n|'.*?'|&$w;|\@$w|not \(|stringlength \(|normalize-space \()(.*$)/sg ) {
+    while ( $attvalue =~ /^(.*?)(\$$w|$w\(|$ns:$n|$w:|db:$n|\@$n:$n|'.*?'|&$w;|&#$w;|\@$w|not \(|stringlength \(|normalize-space \()(.*$)/sg ) {
   
       # process the leading content which is not pass through
       &addnamespace($1, $Output);