diff options
| author | Chuck Norris (mars.fritz.box) <paul@buetow.org> | 2014-08-28 09:33:11 +0200 |
|---|---|---|
| committer | Chuck Norris (mars.fritz.box) <paul@buetow.org> | 2014-08-28 09:33:11 +0200 |
| commit | b16cca8b3944c071a15ba57820804cfb6da9cbdb (patch) | |
| tree | 91d7939813d251e13a0b62f2cca6b3a8b5085d9a /Xerl/Setup/Parameter.pm | |
| parent | 98eea5583d0c3b52d0fe3dde9e9870ccba2fb983 (diff) | |
refactor
Diffstat (limited to 'Xerl/Setup/Parameter.pm')
| -rw-r--r-- | Xerl/Setup/Parameter.pm | 8 |
1 files changed, 4 insertions, 4 deletions
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(); |