From d8c86365f2648f6921dd6ebaefa87553088b2600 Mon Sep 17 00:00:00 2001
From: doy <doy@tozt.net>
Date: Sun, 12 Apr 2009 15:05:10 -0500
Subject: stop unconditionally preventing the constructor from being inlined

---
 lib/MooseX/NonMoose.pm                 |  1 -
 lib/MooseX/NonMoose/Meta/Role/Class.pm | 12 ------------
 2 files changed, 13 deletions(-)
 delete mode 100644 lib/MooseX/NonMoose/Meta/Role/Class.pm

(limited to 'lib')

diff --git a/lib/MooseX/NonMoose.pm b/lib/MooseX/NonMoose.pm
index b2c6037..e01e837 100644
--- a/lib/MooseX/NonMoose.pm
+++ b/lib/MooseX/NonMoose.pm
@@ -59,7 +59,6 @@ sub init_meta {
     Moose->init_meta(%options);
     Moose::Util::MetaRole::apply_metaclass_roles(
         for_class               => $options{for_class},
-        metaclass_roles         => ['MooseX::NonMoose::Meta::Role::Class'],
         constructor_class_roles =>
             ['MooseX::NonMoose::Meta::Role::Constructor'],
     );
diff --git a/lib/MooseX/NonMoose/Meta/Role/Class.pm b/lib/MooseX/NonMoose/Meta/Role/Class.pm
deleted file mode 100644
index ef954b7..0000000
--- a/lib/MooseX/NonMoose/Meta/Role/Class.pm
+++ /dev/null
@@ -1,12 +0,0 @@
-package MooseX::NonMoose::Meta::Role::Class;
-use Moose::Role;
-
-around _make_immutable_transformer => sub {
-    my $orig = shift;
-    my $self = shift;
-    return $self->$orig(inline_constructor => 0, @_);
-};
-
-no Moose::Role;
-
-1;
-- 
cgit v1.2.3-54-g00ecf