X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst.pm;h=1b4c69fcc451201303ee822d99c827224a679e58;hb=8287cb1c9c2cd36b97ccbb75fc2c2b6bb32a7857;hp=fad4c90a75a8069e2c4c695060c7d8119000a5e1;hpb=d24c7cad0d53c5e72dfd163af5862ba4890d58e2;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm index fad4c90..1b4c69f 100644 --- a/lib/Catalyst.pm +++ b/lib/Catalyst.pm @@ -142,6 +142,15 @@ sub MODIFY_CODE_ATTRIBUTES { ); } +sub BUILD { + my $self = shift; + my $class = ref $self; + + Catalyst::Exception->throw("You can't run the application before $class" . "->setup") + unless $class->setup_finished; + + $self->container->_set_application($self); +} sub _application { $_[0] }