Bug in print_string()

[Samuli K�rkk�inen]

You might already know this, but in Xerces-Perl 1.7.0 DOMParse.pm's
print_string() breaks if the string being printed has newlines, because
the regexp character "." doesn't match newlines. I myself replaced the
function with

sub print_string {
        my ($fh, $string) = @_;
        if ($string =~ /[\&\<\>]/) {
                $string =~ s/\&/\&amp;/g;
                $string =~ s/\</\&lt;/g;
                $string =~ s/\>/\&gt;/g;
        }
        print $fh $string;
}

-- 
  Samuli K�rkk�inen                   |\      _,,,---,,_
 [EMAIL PROTECTED] /,`.-'`'    -.  ;-;;,_------
http://www.woods.iki.fi              |,4-  ) )-,_. ,\ (  `'-'
                                     '---''(_/--'  `-'\_)

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]