And lets have a test that the reflector works in interface role mode

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

diff --git a/t/07_dynamiccontrollers_interface.t b/t/07_dynamiccontrollers_interface.t
new file mode 100644 (file)
index 0000000..8e7e60a
--- /dev/null
+++ b/t/07_dynamiccontrollers_interface.t
@@ -0,0 +1,19 @@
+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.
+