[svn:mod_parrot] r553 - in mod_parrot/trunk/languages/perl6/lib: . ModPerl6
[email protected] Mon, 29 Dec 2008 12:56:00 -0800 (PST)
| Newsgroups | perl.cvs.mod_parrot |
|---|---|
| Message-ID | <[email protected]> |
Author: jhorwitz
Date: Mon Dec 29 12:56:00 2008
New Revision: 553
Modified:
mod_parrot/trunk/languages/perl6/lib/ModPerl6/Registry.pm
mod_parrot/trunk/languages/perl6/lib/mod_perl6.pm
Log:
reorder "use" and "module" so precompilation works (workaround for Parrot RT #61826)
Modified: mod_parrot/trunk/languages/perl6/lib/ModPerl6/Registry.pm
==============================================================================
--- mod_parrot/trunk/languages/perl6/lib/ModPerl6/Registry.pm (original)
+++ mod_parrot/trunk/languages/perl6/lib/ModPerl6/Registry.pm Mon Dec 29 12:56:00 2008
@@ -1,12 +1,12 @@
# $Id$
-module ModPerl6::Registry;
-
use v6;
# for perl 6 functionality not yet supported by rakudo
use ModPerl6::Fudge;
+module ModPerl6::Registry;
+
our %registry;
regex header_regex { ^^ ([\w|'-']+) ':' <ws> (\N+) $$ };
Modified: mod_parrot/trunk/languages/perl6/lib/mod_perl6.pm
==============================================================================
--- mod_parrot/trunk/languages/perl6/lib/mod_perl6.pm (original)
+++ mod_parrot/trunk/languages/perl6/lib/mod_perl6.pm Mon Dec 29 12:56:00 2008
@@ -14,8 +14,6 @@
# See the License for the specific language governing permissions and
# limitations under the License.
-module ModParrot::HLL::perl6;
-
use v6;
use ModParrot::Const;
use Apache::Const;
@@ -23,6 +21,8 @@
# for perl 6 functionality not yet supported by rakudo
use ModPerl6::Fudge;
+module ModParrot::HLL::perl6;
+
our %loaded_modules;
our %valid_options = <
enable