added cgi_chain_root
[catagits/Catalyst-Controller-WrapCGI.git] / t / cgibin_chain_root.t
similarity index 50%
rename from t/cgibin_root.t
rename to t/cgibin_chain_root.t
index 876fbe7..cc0c784 100644 (file)
@@ -8,14 +8,14 @@ use lib "$Bin/lib";
 
 use Test::More tests => 1;
 
-use Catalyst::Test 'TestCGIBinRoot';
+use Catalyst::Test 'TestCGIBinChainRoot';
 use HTTP::Request::Common;
 
-# Test configurable path root and dir
+# Test configurable path root and dir, and Chained root
 
 my $response = request POST '/cgi/path/test.pl', [
     foo => 'bar',
-    bar => 'baz'
+    bar => 'baz',
 ];
 
-is($response->content, 'foo:bar bar:baz', 'POST to Perl CGI File');
+is($response->content, 'foo:bar bar:baz from_chain:from_chain', 'POST to Perl CGI File');