From 987fc6e26baea18fa0c3c48fb1208c5c350a4bc1 Mon Sep 17 00:00:00 2001 From: edenc Date: Thu, 17 Sep 2009 18:14:04 +0000 Subject: compatibility fixes for Class::MOP 0.93 --- lib/Reaction/UI/Controller.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'lib/Reaction/UI/Controller.pm') diff --git a/lib/Reaction/UI/Controller.pm b/lib/Reaction/UI/Controller.pm index 8ed781f..2d1b843 100644 --- a/lib/Reaction/UI/Controller.pm +++ b/lib/Reaction/UI/Controller.pm @@ -11,7 +11,8 @@ with 'Catalyst::Component::InstancePerContext'; sub build_per_context_instance { my ($self, $c, @args) = @_; - my $newself = $self->new($self->_application, {%$self, context => $c, @args}); + my $class = ref($self) || $self; + my $newself = $class->new($self->_application, {%$self, context => $c, @args}); return $newself; } -- cgit v1.2.3-54-g00ecf