X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst%2FComponent.pm;h=fe0ef6fe3e347bf168dbb1561fe708f3657b1840;hp=870418c1a8e59c26cb87a3a3aee20765f4501651;hb=df960201c8d8c22edddedced4471c14606877145;hpb=81f25ce60d12146ada6baa3ed8db87a0e8a54408 diff --git a/lib/Catalyst/Component.pm b/lib/Catalyst/Component.pm index 870418c..fe0ef6f 100644 --- a/lib/Catalyst/Component.pm +++ b/lib/Catalyst/Component.pm @@ -113,6 +113,8 @@ sub COMPONENT { sub config { my $self = shift; + # Uncomment once sane to do so + #Carp::cluck("config method called on instance") if ref $self; my $config = $self->_config || {}; if (@_) { my $newconfig = { %{@_ > 1 ? {@_} : $_[0]} };