render support.

[catagits/Catalyst-View-TT.git] / t / 06includepath.t

diff --git a/t/06includepath.t b/t/06includepath.t
index c376a8e..f2bea82 100644 (file)
--- a/t/06includepath.t
+++ b/t/06includepath.t
@@ -1,6 +1,6 @@
 use strict;
 use warnings;
-use Test::More tests => 9;
+use Test::More tests => 10;
 
 use FindBin;
 use lib "$FindBin::Bin/lib";
@@ -8,9 +8,15 @@ use lib "$FindBin::Bin/lib";
 use_ok('Catalyst::Test', 'TestApp');
 my $response;
 
+my $inital_include_path = [ @{ TestApp->view('Appconfig')->include_path } ];
+
 ok(($response = request("/test_includepath?view=Appconfig&template=testpath.tt&additionalpath=test_include_path"))->is_success, 'additional_template_path request');
 is($response->content, TestApp->config->{default_message}, 'additional_template_path message');
 
+is_deeply($inital_include_path,
+    TestApp->view('Appconfig')->include_path,
+    'Include path is unchanged');
+
 ok(($response = request("/test_includepath?view=Includepath&template=testpath.tt"))->is_success, 'scalar include path from config request');
 is($response->content, TestApp->config->{default_message}, 'scalar include path with delimiter from config message');