t/lib/TestApp/Model/Foo.pm

   1 package TestApp::Model::Foo;
   2
   3 use strict;
   4 use warnings;
   5
   6 use base qw/ Catalyst::Model /;
   7
   8 __PACKAGE__->config( 'quux' => 'chunkybacon' );
   9
  10 sub model_foo_method { 1 }
  11
  12 sub model_quux_method { shift->{quux} }
  13
  14 package TestApp::Model::Foo::Bar;
  15 sub model_foo_bar_method_from_foo { 1 }
  16
  17 package TestApp::Model::Foo;
  18 sub bar { "TestApp::Model::Foo::Bar" }
  19
  20 1;