X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst.pm;h=db307ab9bc2477df00b3c95b75a8bcaf7fa01717;hb=edb20ed3aaf578b6784f7e0a52ed8c00f05f2718;hp=8a1167f8ec4b29b2b133b06d8546fbfcd4178047;hpb=54f4bfeffdb580af3e4668d31c855bccb1e0623a;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm index 8a1167f..db307ab 100644 --- a/lib/Catalyst.pm +++ b/lib/Catalyst.pm @@ -8,7 +8,7 @@ use Moose; use Class::MOP::Object (); extends 'Catalyst::Component'; use bytes; -use B::Hooks::EndOfScope; +use Scope::Upper (); use Catalyst::Exception; use Catalyst::Log; use Catalyst::Request; @@ -1024,10 +1024,10 @@ EOF # Note however that we have to do the work on scope end, so that method # modifiers work correctly in MyApp (as you have to call setup _before_ # applying modifiers). - on_scope_end { + Scope::Upper::reap(sub { my $meta = $class->Moose::Object::meta(); $meta->make_immutable unless $meta->is_immutable; - }; + }, 1); $class->setup_finished(1); }