X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst%2FComponent%2FContextClosure.pm;h=8c163e0754bce7da896d78686686a29f79c4b29e;hp=475b9622bb6799fe3e761a60c3504861629b0360;hb=eefc03e12890c06c9a76d78b4d68e3b2ad781328;hpb=c9f762d744cb30613f7804bb03733c90c1a45c0e

diff --git a/lib/Catalyst/Component/ContextClosure.pm b/lib/Catalyst/Component/ContextClosure.pm
index 475b962..8c163e0 100644
--- a/lib/Catalyst/Component/ContextClosure.pm
+++ b/lib/Catalyst/Component/ContextClosure.pm
@@ -2,11 +2,10 @@ package Catalyst::Component::ContextClosure;
 
 use Moose::Role;
 use Scalar::Util 'weaken';
-use namespace::autoclean;
+use namespace::clean -except => [ 'meta' ];
 
 sub make_context_closure {
     my ($self, $closure, $ctx) = @_;
-    my $weak_ctx = $ctx;
     weaken $ctx;
     return sub { $closure->($ctx, @_) };
 }
@@ -23,7 +22,7 @@ Catalyst::Component::ContextClosure - Moose Role for components which need to cl
 
     package MyApp::Controller::Foo;
     use Moose;
-    use namespace::autoclean;
+    use namespace::clean -except => 'meta';
     BEGIN {
         extends 'Catalyst::Controller';
         with 'Catalyst::Component::ContextClosure';
@@ -34,7 +33,7 @@ Catalyst::Component::ContextClosure - Moose Role for components which need to cl
         $ctx->stash(a_closure => $self->make_context_closure(sub {
             my ($ctx) = @_;
             $ctx->response->body('body set from closure');
-        }, $ctx);
+        }, $ctx));
     }
 
 =head1 DESCRIPTION
@@ -64,9 +63,13 @@ L<Catalyst::Controller>
 
 L<CatalystX::LeakChecker>
 
+=begin stopwords
+
 =head1 AUTHOR
 
-Florian Ragwitz E<lt>rafl@debian.orgE<gt>
+Florian Ragwitz <rafl@debian.org>
+
+=end stopwords
 
 =head1 COPYRIGHT