[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