[catagits/CatalystX-DynamicComponent.git] / t / 06_dynamicmodel_interface.t

use strict;
use warnings;

use FindBin qw/$Bin/;
use lib "$Bin/lib";

use Test::More tests => 2;

BEGIN { use_ok('ModelsFromConfigInterfaceApp'); }

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