1use Catalyst (); 2 3{ 4 package TestApp; 5 use base qw/Catalyst/; 6} 7{ 8 package TestApp::Controller::Base; 9 use base qw/Catalyst::Controller/; 10} 11{ 12 package TestApp::Controller::Other; 13 use Moose; 14 use Test::More tests => 1; 15 use Test::Fatal; 16 is exception { 17 extends 'TestApp::Controller::Base'; 18 }, undef; 19} 20 21