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; | |
15 | use Test::Exception; | |
16 | lives_ok { | |
17 | extends 'TestApp::Controller::Base'; | |
18 | }; | |
19 | } | |
20 |