From: Sebastian Riedel <sri@labs.kraih.com>
Date: Mon, 18 Apr 2005 19:31:15 +0000 (+0000)
Subject: Fixed $self, maybe
X-Git-Tag: 5.7099_04~1480
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=91571b7b15fd05fbcb7014a274dc1f03c34e68be

Fixed $self, maybe
---

diff --git a/lib/Catalyst/Engine.pm b/lib/Catalyst/Engine.pm
index e25b205..257a8cd 100644
--- a/lib/Catalyst/Engine.pm
+++ b/lib/Catalyst/Engine.pm
@@ -126,7 +126,7 @@ Errors are available via $c->error.
 
 sub execute {
     my ( $c, $class, $code ) = @_;
-    $class = $c->comp($class) || $class;
+    $class = $c->components->{$class} || $class;
     $c->state(0);
     my $callsub = ( caller(1) )[3];