[Catalyst-commits] r10169 - Catalyst-Runtime/5.80/trunk/lib

[t0m at dev.catalyst.perl.org]

Author: t0m
Date: 2009-05-15 12:53:54 +0000 (Fri, 15 May 2009)
New Revision: 10169

Modified:
   Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm
Log:
And properly fix Unknown error

Modified: Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm	2009-05-15 12:53:10 UTC (rev 10168)
+++ Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm	2009-05-15 12:53:54 UTC (rev 10169)
@@ -1101,6 +1101,7 @@
     # modifiers work correctly in MyApp (as you have to call setup _before_
     # applying modifiers).
     B::Hooks::EndOfScope::on_scope_end {
+        return if $@;
         my $meta = Class::MOP::get_metaclass_by_name($class);
         if ( $meta->is_immutable && ! { $meta->immutable_options }->{inline_constructor} ) {
             warn "You made your application class ($class) immutable, "