X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst.pm;h=73b36c868b2d5e3bc8ebcb2798320c5646ad362e;hb=gsoc_breadboard_plugin_errors;hp=53e06a987495eeb475945025282a5e6a2a8e5b54;hpb=3d754f5852a61d0f5ba6321385d2ddb5bbb27ae5;p=catagits%2FCatalyst-Runtime.git

diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm
index 53e06a9..73b36c8 100644
--- a/lib/Catalyst.pm
+++ b/lib/Catalyst.pm
@@ -740,7 +740,7 @@ sub component {
     # I'm keeping it temporarily for things like $c->comp('MyApp')
     #return $c->components->{$component}
     #    if exists $c->components->{$component} and !@args;
-
+    Carp::cluck("MOO") if $component eq "PluginTestApp";
     $c->log->warn("Looking for '$component', but nothing was found.");
 
     # I would expect to return an empty list here, but that breaks back-compat