Clean up various bits of code that broke when dzil processed them.

[gitmo/Moose.git] / lib / Class / MOP / Module.pm

diff --git a/lib/Class/MOP/Module.pm b/lib/Class/MOP/Module.pm
index 4d66366..4142dfc 100644 (file)
--- a/lib/Class/MOP/Module.pm
+++ b/lib/Class/MOP/Module.pm
@@ -16,9 +16,11 @@ sub _new {
 
     my $params = @_ == 1 ? $_[0] : {@_};
     return bless {
+        # Need to quote package to avoid a problem with PPI mis-parsing this
+        # as a package statement.
 
         # from Class::MOP::Package
-        package   => $params->{package},
+        'package' => $params->{package},
         namespace => \undef,
 
         # attributes