X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst.pm;h=755a9abae93670fc120aa1d2c0fa29304c8cabb3;hp=961899e1086c0abe1334c14c4d14f700ceb72763;hb=5168a5fce4597cd5e1fc4db9d9a400dd0137f674;hpb=60fa95baef6674b7431c19bdf5c97ac32aa1ef81

diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm
index 961899e..755a9ab 100644
--- a/lib/Catalyst.pm
+++ b/lib/Catalyst.pm
@@ -725,6 +725,9 @@ Catalyst> line.
 sub setup {
     my ( $class, @arguments ) = @_;
 
+    $class->log->warn("Running setup twice is not a good idea.")
+      if ( $class->setup_finished );
+
     unless ( $class->isa('Catalyst') ) {
 
         Catalyst::Exception->throw(