summaryrefslogtreecommitdiff
path: root/Xerl/XML/Reader.pm
diff options
context:
space:
mode:
authorPaul Buetow (pluto.buetow.org) <paul@buetow.org>2013-09-28 17:11:45 +0200
committerPaul Buetow (pluto.buetow.org) <paul@buetow.org>2013-09-28 17:11:45 +0200
commit215b7573acc8462c7ae0ea594f270bf21323bd11 (patch)
treeae820dc9b763e394abdd812156c6fee14200e3f4 /Xerl/XML/Reader.pm
parent887eb3f41018262fc562e51561310cd0fdfb3bb0 (diff)
perltidy
Diffstat (limited to 'Xerl/XML/Reader.pm')
-rw-r--r--Xerl/XML/Reader.pm13
1 files changed, 6 insertions, 7 deletions
diff --git a/Xerl/XML/Reader.pm b/Xerl/XML/Reader.pm
index 1828e18..176f405 100644
--- a/Xerl/XML/Reader.pm
+++ b/Xerl/XML/Reader.pm
@@ -2,7 +2,7 @@
#
# E-Mail: xerl@dev.buetow.org WWW: http://xerl.buetow.org
#
-# This is free software, you may use it and distribute it under the same
+# This is free software, you may use it and distribute it under the same
# terms as Perl itself.
package Xerl::XML::Reader;
@@ -21,7 +21,8 @@ sub open($) {
if ( -f $self->get_path() ) {
return 0;
- } else {
+ }
+ else {
return 1;
}
}
@@ -30,13 +31,11 @@ sub parse() {
my Xerl::XML::Reader $self = $_[0];
my $sax_handler = Xerl::XML::SAXHandler->new();
- my $parser = XML::SAX::ParserFactory->parser(
- Handler => $sax_handler
- );
+ my $parser = XML::SAX::ParserFactory->parser( Handler => $sax_handler );
- $parser->parse_uri($self->get_path());
+ $parser->parse_uri( $self->get_path() );
- $self->set_root($sax_handler->{xerl}{root});
+ $self->set_root( $sax_handler->{xerl}{root} );
return undef;
}