X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flive_verify_address.t;h=43c52c99d3d7b791ea5bea468c398aa9286ef631;hb=32f970985a0368ec8d41894a8cf3692ae44fedab;hp=3b2ca717d820f47b334c65d893888ff544e1bd7f;hpb=1cc0918560d7c469961dd3e24833bcd8d4ff594f;p=catagits%2FCatalyst-Plugin-Session.git diff --git a/t/live_verify_address.t b/t/live_verify_address.t index 3b2ca71..43c52c9 100644 --- a/t/live_verify_address.t +++ b/t/live_verify_address.t @@ -37,18 +37,18 @@ $ua->get_ok( "http://localhost/set_session_variable/logged/in" ); $ua->content_contains('session variable set'); -# Change Client +# Change Client #local $ENV{REMOTE_ADDR} = "192.168.1.2"; use Plack::Builder; my $app = SessionTestApp->psgi_app(@_); -builder { +builder { enable 'ForceEnv' => REMOTE_ADDR => "192.168.1.2"; $app; }; my $ua2 = Test::WWW::Mechanize::PSGI->new( app => $app, cookie_jar => {} -); +); $ua2->get_ok( "http://localhost/get_session_variable/logged"); $ua2->content_contains('VAR_logged=n.a.'); @@ -61,7 +61,7 @@ $ua->content_contains('logged in (without address)'); $ua->get_ok( "http://localhost/set_session_variable/logged/in" ); $ua->content_contains('session variable set'); -# Change Client +# Change Client local $ENV{REMOTE_ADDR} = "192.168.1.2"; $ua->get_ok( "http://localhost/get_session_variable/logged" );