Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
PerlMonks  

(tye)Re: framechat2

by tye (Sage)
on Mar 08, 2002 at 19:05 UTC ( #150402=note: print w/replies, xml ) Need Help??


in reply to framechat2

With the new chatterbox xml ticker (which generates valid XML), framechat2 needs the following patch (thanks to Zaxo for help and testing). Change the fixxml sub to:

sub fixxml { # fix the xml nodes so they parse correctly my$xml = shift; my$fix = q{<?xml version="1.0" encoding="ISO-8859-1"?> <!DOCTYPE CHATTER SYSTEM "dummy.dtd"[]>}; # mirod to the re +scue! $xml = $fix.$xml unless $xml =~ /^\s*\Q<?xml\E/; $xml =~ s/[\r\n\t]//g; # jcwren $xml =~ y/\x00-\x1f//d; # strip control chrs # Note that you should only need at most one of the above two lines. # The latter does everything the "jcwren" line does but # the extra strippage doesn't appear to be needed. return $xml; # to the xml parser }

        - tye (but my friends call me "Tye")