t/aggregate/unit_metaclass_compat_extend_non_moose_controller.t

   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