X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/e2da553ff383556b6277040b2454a2d06ee70174..53593baa211863fbf66540cf1bcc36c8fb37257f:/t/controllers/base/render.t

diff --git a/t/controllers/base/render.t b/t/controllers/base/render.t
index 716ba428c..b9ce240be 100644
--- a/t/controllers/base/render.t
+++ b/t/controllers/base/render.t
@@ -1,12 +1,14 @@
 use strict;
 use Test::Exception;
-use Test::More;
+use Test::More tests => 19;
 use Test::Output;
 
 use lib 't';
 use Support::TestSetup;
 
 use SL::Presenter;
+use SL::Controller::Base;
+use SL::Layout::Javascript;
 
 no warnings 'uninitialized';
 
@@ -15,10 +17,9 @@ Support::TestSetup::login();
 sub reset_test_env {
   $ENV{HTTP_USER_AGENT} = 'Perl Tests';
 
-  $::request       = {
-    cgi => CGI->new({}),
+  $::request = Support::TestSetup->create_new_request(
     layout => SL::Layout::Javascript->new,
-  };
+  );
 
   $::myconfig{menustyle} = 'javascript';