X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Faggregate%2Funit_core_script_cgi.t;h=ffadb8af43b5510e8f5269be355b801322a3b3ec;hb=990899d8c82b60748d5b4efa0d9ef3c9480104de;hp=f39e377c25d8464f3fef0b16dbc619162850c3a7;hpb=c821df216d6d7e7e0386516e43c0c09fd4a295e7;p=catagits%2FCatalyst-Runtime.git

diff --git a/t/aggregate/unit_core_script_cgi.t b/t/aggregate/unit_core_script_cgi.t
index f39e377..ffadb8a 100644
--- a/t/aggregate/unit_core_script_cgi.t
+++ b/t/aggregate/unit_core_script_cgi.t
@@ -15,8 +15,8 @@ lives_ok {
     Catalyst::Script::CGI->new_with_options(application_name => 'TestAppToTestScripts')->run;
 } "new_with_options";
 shift @TestAppToTestScripts::RUN_ARGS;
-my $server = shift @TestAppToTestScripts::RUN_ARGS;
-like ref($server), qr/^Plack::Server/, 'Is a Plack Server';
+my $server = pop @TestAppToTestScripts::RUN_ARGS;
+like ref($server), qr/^Plack::Handler/, 'Is a Plack::Handler';
 is_deeply \@TestAppToTestScripts::RUN_ARGS, [], "no args";
 
 done_testing;