Commit | Line | Data |
---|---|---|
7ba9f98c | 1 | use 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; | |
2a56ace9 | 15 | use Test::Fatal; |
16 | is exception { | |
7ba9f98c | 17 | extends 'TestApp::Controller::Base'; |
2a56ace9 | 18 | }, undef; |
7ba9f98c | 19 | } |
20 |