From: Yuval Kogman Date: Fri, 13 Jan 2006 18:29:02 +0000 (+0000) Subject: Remove warnings from C::P::Session test suite X-Git-Tag: v0.06~22 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=124488fbef6d4db4747416b08321c651cd5847d6;p=catagits%2FCatalyst-Plugin-Session.git Remove warnings from C::P::Session test suite --- diff --git a/TODO b/TODO index c8bd1d5..a36dd05 100644 --- a/TODO +++ b/TODO @@ -11,4 +11,3 @@ - flock - berkeleydb - fastmmap - diff --git a/lib/Catalyst/Plugin/Session/Test/Store.pm b/lib/Catalyst/Plugin/Session/Test/Store.pm index a43d57e..0e246e2 100644 --- a/lib/Catalyst/Plugin/Session/Test/Store.pm +++ b/lib/Catalyst/Plugin/Session/Test/Store.pm @@ -134,9 +134,11 @@ sub import { package t1; use Catalyst::Test "SessionStoreTest"; - get("/create_session"); - get("/recover_session"); - get("/after_session"); + # idiotic void context warning workaround + + my $x = get("/create_session"); + $x = get("/recover_session"); + $x = get("/after_session"); } { @@ -144,9 +146,9 @@ sub import { package t2; use Catalyst::Test "SessionStoreTest2"; - get("/create_session"); + my $x = get("/create_session"); sleep 1; # let the session expire - get("/recover_session"); + $x = get("/recover_session"); } }