t/06_dynamicmodel_interface.t

   1 use strict;
   2 use warnings;
   3
   4 use FindBin qw/$Bin/;
   5 use lib "$Bin/lib";
   6
   7 use Test::More tests => 2;
   8
   9 BEGIN { use_ok('ModelsFromConfigInterfaceApp'); }
  10
  11 my $config = ModelsFromConfigInterfaceApp->config;
  12 delete $config->{'CatalystX::DynamicComponent::ModelToControllerReflector'};
  13
  14 is_deeply($config, {
  15     name => 'ModelsFromConfigInterfaceApp',
  16     'Model::One' => {
  17         class => 'SomeModelClass',
  18         interface_roles => [qw/ SomeModelClassInterface /],
  19     },
  20 }, 'Config is not munged');
  21