[Catalyst-commits] r6676 - in branches: .
templated_conversion/Catalyst-View-TT/t
jrockway at dev.catalyst.perl.org
jrockway at dev.catalyst.perl.org
Fri Aug 17 15:51:01 GMT 2007
Author: jrockway
Date: 2007-08-17 15:51:00 +0100 (Fri, 17 Aug 2007)
New Revision: 6676
Modified:
branches/
branches/templated_conversion/Catalyst-View-TT/t/06includepath.t
Log:
r28425 at foo: jon | 2007-08-10 00:23:31 -0500
be less dumb about TestApp->...
Property changes on: branches
___________________________________________________________________
Name: svk:merge
- d7608cd0-831c-0410-93c0-e5b306c3c028:/local/Catalyst-branches:28424
+ d7608cd0-831c-0410-93c0-e5b306c3c028:/local/Catalyst-branches:28425
Modified: branches/templated_conversion/Catalyst-View-TT/t/06includepath.t
===================================================================
--- branches/templated_conversion/Catalyst-View-TT/t/06includepath.t 2007-08-17 14:50:50 UTC (rev 6675)
+++ branches/templated_conversion/Catalyst-View-TT/t/06includepath.t 2007-08-17 14:51:00 UTC (rev 6676)
@@ -5,24 +5,25 @@
use FindBin;
use lib "$FindBin::Bin/lib";
+my $TestApp = bless {} => 'TestApp';
+
use_ok('Catalyst::Test', 'TestApp');
my $response;
-my $inital_include_path = [ @{ TestApp->view('Appconfig')->include_path } ];
+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($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');
+is($response->content, $TestApp->config->{default_message}, 'scalar include path with delimiter from config message');
ok(($response = request("/test_includepath?view=Includepath2&template=testpath.tt"))->is_success, 'object ref (that stringifys to the path) include path from config request');
-is($response->content, TestApp->config->{default_message}, 'object ref (that stringifys to the path) include path from config message');
+is($response->content, $TestApp->config->{default_message}, 'object ref (that stringifys to the path) include path from config message');
ok(($response = request("/test_includepath?view=Includepath3&template=testpath.tt&addpath=test_include_path"))->is_success, 'array ref include path from config not replaced by another array request');
-is($response->content, TestApp->config->{default_message}, 'array ref include path from config not replaced by another array message');
-
+is($response->content, $TestApp->config->{default_message}, 'array ref include path from config not replaced by another array message');
More information about the Catalyst-commits
mailing list