diff options
Diffstat (limited to 'Xerl/XML/Reader.pm')
| -rw-r--r-- | Xerl/XML/Reader.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/Xerl/XML/Reader.pm b/Xerl/XML/Reader.pm index 96a8835..9d9d3d6 100644 --- a/Xerl/XML/Reader.pm +++ b/Xerl/XML/Reader.pm @@ -52,14 +52,15 @@ sub open($) { sub sax() { my Xerl::XML::Reader $self = $_[0]; + my $sax_handler = Xerl::XML::SAXHandler->new(); my $parser = XML::SAX::ParserFactory->parser( - Handler => Xerl::XML::SAXHandler->new() + Handler => $sax_handler ); $parser->parse_uri($self->get_path()); - return $parser->{xerl}{root}; + return $sax_handler->{xerl}{root}; } sub parse($) { |