cvs commit: xml-axkit/lib/Apache/AxKit/Language XSP.pm

[matts]

matts       2005/04/20 13:06:54

  Modified:    lib/Apache/AxKit/Language XSP.pm
  Log:
  Support namespace prefixes for ordinary elements.
  
  Revision  Changes    Path
  1.54      +7 -1      xml-axkit/lib/Apache/AxKit/Language/XSP.pm
  
  Index: XSP.pm
  ===================================================================
  RCS file: /home/cvs/xml-axkit/lib/Apache/AxKit/Language/XSP.pm,v
  retrieving revision 1.53
  retrieving revision 1.54
  diff -u -r1.53 -r1.54
  --- XSP.pm    20 Apr 2005 20:02:14 -0000      1.53
  +++ XSP.pm    20 Apr 2005 20:06:54 -0000      1.54
  @@ -1228,6 +1228,12 @@
   
   sub __mk_element_node {
       my ($document, $parent, $name) = @_;
  +    if ($name =~ s/^(.*?)://) {
  +        my $prefix = $1;
  +        my $uri = $parent->lookupNamespaceURI($prefix)
  +            || die "No namespace URI for prefix '$prefix'";
  +        return __mk_ns_element_node($document, $parent, $uri, $name);
  +    }
       my $elem = $document->createElement($name);
       if ($parent) {
           $parent->appendChild($elem);