[catagits/CatalystX-DynamicComponent.git] / t / 07_dynamiccontrollers_interface.t

use strict;
use warnings;

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

use Test::More tests => 3;

BEGIN { use_ok('ModelsFromConfigInterfaceApp'); }

my $controller = ModelsFromConfigInterfaceApp->controller('One');
ok $controller, 'Generated a controller';

my $action = $controller->action_for('say_hello');
ok $action, 'Got action reflected from model';

# Actions we generate are still totally frigging useless, so lets not test
# that here yet.
Commit	Line	Data
932a7c33	1	use strict;
	2	use warnings;
	3
	4	use FindBin qw/$Bin/;
	5	use lib "$Bin/lib";
	6
	7	use Test::More tests => 3;
	8
	9	BEGIN { use_ok('ModelsFromConfigInterfaceApp'); }
	10
	11	my $controller = ModelsFromConfigInterfaceApp->controller('One');
	12	ok $controller, 'Generated a controller';
	13
	14	my $action = $controller->action_for('say_hello');
	15	ok $action, 'Got action reflected from model';
	16
	17	# Actions we generate are still totally frigging useless, so lets not test
	18	# that here yet.
	19