6 package MyApp::Component;
10 fail 'This no longer gets dispatched to';
13 package MyApp::MyComponent;
15 use base 'Catalyst::Component', 'MyApp::Component';
21 local $SIG{__WARN__} = sub {
24 MyApp::MyComponent->COMPONENT('MyApp');
27 like($warn, qr/after Catalyst::Component in MyApp::Component/,
28 'correct warning thrown');