[Catalyst-commits] r9326 - in trunk/Catalyst-View-TT/t: . lib
marcus at dev.catalyst.perl.org
marcus at dev.catalyst.perl.org
Tue Feb 17 23:39:24 GMT 2009
Author: marcus
Date: 2009-02-17 23:39:24 +0000 (Tue, 17 Feb 2009)
New Revision: 9326
Modified:
trunk/Catalyst-View-TT/t/06includepath.t
trunk/Catalyst-View-TT/t/lib/TestApp.pm
Log:
Fix test warnings
Modified: trunk/Catalyst-View-TT/t/06includepath.t
===================================================================
--- trunk/Catalyst-View-TT/t/06includepath.t 2009-02-17 22:54:34 UTC (rev 9325)
+++ trunk/Catalyst-View-TT/t/06includepath.t 2009-02-17 23:39:24 UTC (rev 9326)
@@ -8,13 +8,13 @@
use_ok('Catalyst::Test', 'TestApp');
my $response;
-my $inital_include_path = [ @{ TestApp->view('Appconfig')->include_path } ];
+my $inital_include_path = [ @{ TestApp->view('TT::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,
+ TestApp->view('TT::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');
Modified: trunk/Catalyst-View-TT/t/lib/TestApp.pm
===================================================================
--- trunk/Catalyst-View-TT/t/lib/TestApp.pm 2009-02-17 22:54:34 UTC (rev 9325)
+++ trunk/Catalyst-View-TT/t/lib/TestApp.pm 2009-02-17 23:39:24 UTC (rev 9326)
@@ -53,7 +53,7 @@
sub test_render : Local {
my ($self, $c) = @_;
- my $out = $c->stash->{message} = $c->view('TT')->render($c, $c->req->param('template'), {param => $c->req->param('param') || ''});
+ my $out = $c->stash->{message} = $c->view('TT::Appconfig')->render($c, $c->req->param('template'), {param => $c->req->param('param') || ''});
if (UNIVERSAL::isa($out, 'Template::Exception')) {
$c->response->body($out);
$c->response->status(403);
@@ -67,7 +67,7 @@
my ($self, $c) = @_;
my $tmpl = $c->req->param('msg');
- $c->stash->{message} = $c->view('TT')->render($c, \$tmpl);
+ $c->stash->{message} = $c->view('TT::AppConfig')->render($c, \$tmpl);
$c->stash->{template} = 'test.tt';
}
More information about the Catalyst-commits
mailing list