[svn:mod_parrot] r424 - mod_parrot/branches/hll-modules/languages/perl6/lib
[email protected] Thu, 18 Sep 2008 12:32:45 -0700 (PDT)
| Newsgroups | perl.cvs.mod_parrot |
|---|---|
| Message-ID | <[email protected]> |
Author: jhorwitz
Date: Thu Sep 18 12:32:45 2008
New Revision: 424
Modified:
mod_parrot/branches/hll-modules/languages/perl6/lib/mod_perl6.pm
Log:
remove debugging cruft and fix formatting
Modified: mod_parrot/branches/hll-modules/languages/perl6/lib/mod_perl6.pm
==============================================================================
--- mod_parrot/branches/hll-modules/languages/perl6/lib/mod_perl6.pm (original)
+++ mod_parrot/branches/hll-modules/languages/perl6/lib/mod_perl6.pm Thu Sep 18 12:32:45 2008
@@ -32,8 +32,7 @@
sub server_create()
{
- my %cfg =
- 'foo' => 'bar';
+ my %cfg;
return %cfg;
}
@@ -48,7 +47,8 @@
my $r = $ctx.request_rec();
my %cfg = Apache::Module::get_config("modparrot_perl6_module");
- my %dircfg = Apache::Module::get_config("modparrot_perl6_module", $r.per_dir_config());
+ my %dircfg = Apache::Module::get_config("modparrot_perl6_module",
+ $r.per_dir_config());
my $handler = %dircfg{'response_handler'};
load($handler);