Update of /cvsroot/net-script/netscript2/src/perl/XML/DOM2
In directory usw-pr-cvs1:/tmp/cvs-serv3372
Modified Files:
XMLDOMWriterStyle.pm
Log Message:
* beautified output
Index: XMLDOMWriterStyle.pm
===================================================================
RCS file: /cvsroot/net-script/netscript2/src/perl/XML/DOM2/XMLDOMWriterStyle.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** XMLDOMWriterStyle.pm 17 Mar 2002 19:26:15 -0000 1.1
--- XMLDOMWriterStyle.pm 17 Mar 2002 19:27:57 -0000 1.2
***************
*** 98,110 ****
if ( $prefix ne "" && $namespaceURI ne "" ) {
if ( $this -> isURIBound( $prefix, $namespaceURI ) ) {
! $this -> appendText( " $nodeName=\"$nodeValue\" " );
}
else {
$this -> bindURI( $prefix, $namespaceURI );
! $this -> appendText( " $nodeName=\"$nodeValue\" xmlns:$prefix=\"$namespaceURI\" ");
}
}
else {
! $this -> appendText( " $nodeName=\"$nodeValue\" " );
}
}
--- 98,110 ----
if ( $prefix ne "" && $namespaceURI ne "" ) {
if ( $this -> isURIBound( $prefix, $namespaceURI ) ) {
! $this -> appendText( " $nodeName=\"$nodeValue\"" );
}
else {
$this -> bindURI( $prefix, $namespaceURI );
! $this -> appendText( " $nodeName=\"$nodeValue\" xmlns:$prefix=\"$namespaceURI\"");
}
}
else {
! $this -> appendText( " $nodeName=\"$nodeValue\"" );
}
}
|