From b16cca8b3944c071a15ba57820804cfb6da9cbdb Mon Sep 17 00:00:00 2001 From: "Chuck Norris (mars.fritz.box)" Date: Thu, 28 Aug 2014 09:33:11 +0200 Subject: refactor --- Xerl/Setup/Parameter.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'Xerl/Setup/Parameter.pm') diff --git a/Xerl/Setup/Parameter.pm b/Xerl/Setup/Parameter.pm index 45c860d..bee8981 100644 --- a/Xerl/Setup/Parameter.pm +++ b/Xerl/Setup/Parameter.pm @@ -1,4 +1,4 @@ -# Xerl (c) 2005-2011, 2013 Dipl.-Inform. (FH) Paul C. Buetow +# Xerl (c) 2005-2011, 2013, 2014 by Paul Buetow # # E-Mail: xerl@dev.buetow.org WWW: http://xerl.buetow.org # @@ -17,9 +17,9 @@ use Xerl::Main::Global; use Xerl::Setup::Configure; use Xerl::Tools::FileIO; -sub parse($) { - my Xerl::Setup::Parameter $self = $_[0]; - my Xerl::Setup::Configure $config = $self->get_config(); +sub parse { + my $self = $_[0]; + my $config = $self->get_config(); print "Content-Type: text/plain\n\n" if $config->plain_exists(); -- cgit v1.2.3