fixed bug with under block leaking its setting to following actions

[catagits/CatalystX-Declare.git] / t / 110_under_sequence.t

diff --git a/t/110_under_sequence.t b/t/110_under_sequence.t
new file mode 100644 (file)
index 0000000..e5d8253
--- /dev/null
+++ b/t/110_under_sequence.t
@@ -0,0 +1,17 @@
+#!/usr/bin/env perl
+use strict;
+use warnings;
+
+use FindBin;
+use lib "$FindBin::Bin/lib";
+
+use Test::More; 
+use Catalyst::Test 'TestApp';
+
+is get('/under_seq/foo'), 'foo', 'basic action';
+is get('/under_seq/bar/test_bar'), 'bar', 'first action in under scope';
+is get('/under_seq/baz/test_baz'), 'baz', 'following base and under scope';
+
+done_testing;
+
+