diff options
| author | groditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2008-11-11 21:17:18 +0000 |
|---|---|---|
| committer | groditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2008-11-11 21:17:18 +0000 |
| commit | db80cb74feca3ad9f372047624ccfcdfa8122ee4 (patch) | |
| tree | 54738785f10eba0c1c3d340f21870da423b4a172 /lib/Reaction/UI/Controller.pm | |
| parent | 747a1feb2d49d2dba85f997fa2f4542a17800331 (diff) | |
| download | reaction-db80cb74feca3ad9f372047624ccfcdfa8122ee4.tar.gz reaction-db80cb74feca3ad9f372047624ccfcdfa8122ee4.zip | |
dont leak weaken
Diffstat (limited to 'lib/Reaction/UI/Controller.pm')
| -rw-r--r-- | lib/Reaction/UI/Controller.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/Reaction/UI/Controller.pm b/lib/Reaction/UI/Controller.pm index fc2f597..eac550d 100644 --- a/lib/Reaction/UI/Controller.pm +++ b/lib/Reaction/UI/Controller.pm @@ -8,6 +8,7 @@ use base qw( use Reaction::Class; use Scalar::Util 'weaken'; +use namespace::clean -except => [ qw(meta) ]; sub push_viewport { my $self = shift; @@ -77,7 +78,7 @@ sub redirect_to { sub make_context_closure { my($self, $closure) = @_; my $ctx = $self->context; - weaken $ctx; + weaken($ctx); return sub { $closure->($ctx, @_) }; } |