[NetScript CVS] CVS: netscript2/src/perl/XML/DOM2 XMLDOMWriterStyle.pm,1.1,1.2

[Jan T. <de...@us...>]

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\"" );
          }
      }