matts 2003/09/04 12:32:16
Modified: lib/Apache/AxKit Provider.pm
Log:
Fix A-caret chars everywhere.
Revision Changes Path
1.16 +5 -1 xml-axkit/lib/Apache/AxKit/Provider.pm
Index: Provider.pm
===================================================================
RCS file: /home/cvs/xml-axkit/lib/Apache/AxKit/Provider.pm,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -r1.15 -r1.16
--- Provider.pm 28 Jul 2003 22:53:20 -0000 1.15
+++ Provider.pm 4 Sep 2003 19:32:16 -0000 1.16
@@ -71,6 +71,7 @@
my $self = shift;
require Apache::AxKit::LibXMLSupport;
+ AxKit::Debug(8, "Provider::get_dom");
my $parser = XML::LibXML->new();
$parser->expand_entities(1);
local($XML::LibXML::match_cb, $XML::LibXML::open_cb,
@@ -80,10 +81,13 @@
my $xml_doc;
eval {
my $fh = $self->get_fh();
+ AxKit::Debug(8, "Provider::get_dom/parse_fh($fh, ",
$self->{apache}->uri(), ")");
$xml_doc = $parser->parse_fh($fh, $self->{apache}->uri());
};
if ($@) {
+ use bytes;
my $xmlstring = ${$self->get_strref()};
+ AxKit::Debug(8, "Provider::get_dom/parse_string($xmlstring, ",
$self->{apache}->uri(), ")");
$xml_doc = $parser->parse_string($xmlstring, $self->{apache}->uri())
||
throw Apache::AxKit::Exception::Error(
-text => "XML::LibXML->parse_string returned nothing!"
