X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fglobal-context.t;h=396d435a12c23286724a69b6a51ae95ed46ba202;hb=efa4a4342a71f4e26ad25301755b090be880e159;hp=bc3238d4aaeab22a59b88186bb34b88bcc32abab;hpb=ac41c40be89a8406381b1e957db11d35a3bcbf2f;p=catagits%2FCatalyst-Controller-WrapCGI.git diff --git a/t/global-context.t b/t/global-context.t index bc3238d..396d435 100644 --- a/t/global-context.t +++ b/t/global-context.t @@ -2,35 +2,8 @@ use strict; use warnings; - +use lib 't/lib'; use Test::More tests => 1; - -{ - package TestApp; - - use Catalyst; - use CatalystX::GlobalContext (); - - sub auto : Private { - my ($self, $c) = @_; - CatalystX::GlobalContext->set_context($c); - 1; - } - - sub dummy : Local { - my ($self, $c) = @_; - $c->res->body(Dongs->foo); - } - - __PACKAGE__->setup; - - package Dongs; - - use CatalystX::GlobalContext '$c'; - - sub foo { $c->action } -} - -use Catalyst::Test 'TestApp'; +use Catalyst::Test 'TestGC'; is(get('/dummy'), 'dummy', 'global context works');