matts 2003/02/07 04:20:47
Modified: lib AxKit.pm lib/Apache/AxKit/Language XSP.pm Log: Fix warnings and remove XML::LibXML::Common Revision Changes Path 1.41 +3 -3 xml-axkit/lib/AxKit.pm Index: AxKit.pm =================================================================== RCS file: /home/cvs/xml-axkit/lib/AxKit.pm,v retrieving revision 1.40 retrieving revision 1.41 diff -u -r1.40 -r1.41 --- AxKit.pm 5 Feb 2003 14:52:35 -0000 1.40 +++ AxKit.pm 7 Feb 2003 12:20:47 -0000 1.41 @@ -558,8 +558,8 @@ if ($result_code == OK) { # results now in $r->pnotes('xml_string') - probably... - if (length($r->pnotes('xml_string'))) { - my $str = $r->pnotes('xml_string'); + if ( my $str = $r->pnotes('xml_string') ) { + # NB: this is naive, but "0" isn't valid XML anyway $r->pnotes('xml_string', undef); AxKit::Debug(10, "get_axkit_uri returning (str): '$str'"); return $str; 1.36 +1 -2 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.35 retrieving revision 1.36 diff -u -r1.35 -r1.36 --- XSP.pm 4 Feb 2003 17:36:54 -0000 1.35 +++ XSP.pm 7 Feb 2003 12:20:47 -0000 1.36 @@ -919,7 +919,6 @@ package AxKit::XSP::SAXParser; use XML::LibXML 1.30; -use XML::LibXML::Common qw(:libxml :encoding); sub new { my ($type, %self) = @_;