Revision history for Perl extension Catalyst::Plugin::Session
+0.24 2009-06-23
+ - Be more paranoid about getting values of $c->req to avoid issues
+ with old Test::WWW::Mechanize::Catalyst.
+ - Check we have a modern version of TWMC before doing the tests which
+ need it.
+
0.23 2009-06-16
- Add the verify_user_agent config parameter (kmx)
- Add a test case to prove that logging in with a session cookie still
use namespace::clean -except => 'meta';
-our $VERSION = '0.23';
+our $VERSION = '0.24';
my @session_data_accessors; # used in delete_session
(
$c->config->{session}{verify_address}
- ? ( __address => $c->request->address )
+ ? ( __address => $c->request->address||'' )
: ()
),
(
$c->config->{session}{verify_user_agent}
- ? ( __user_agent => $c->request->user_agent )
+ ? ( __user_agent => $c->request->user_agent||'' )
: ()
),
}
or plan skip_all =>
"Catalyst::Plugin::Session::State::Cookie version 0.03 or higher is required for this test";
- eval { require Test::WWW::Mechanize::Catalyst }
- or plan skip_all =>
- 'Test::WWW::Mechanize::Catalyst is required for this test';
+ eval {
+ require Test::WWW::Mechanize::Catalyst;
+ Test::WWW::Mechanize::Catalyst->VERSION(0.51);
+ }
+ or plan skip_all =>
+ 'Test::WWW::Mechanize::Catalyst >= 0.51 is required for this test';
plan tests => '10';
or plan skip_all =>
"Catalyst::Plugin::Session::State::Cookie 0.03 or higher is required for this test";
- eval { require Test::WWW::Mechanize::Catalyst }
- or plan skip_all =>
- "Test::WWW::Mechanize::Catalyst is required for this test";
+ eval {
+ require Test::WWW::Mechanize::Catalyst;
+ Test::WWW::Mechanize::Catalyst->VERSION(0.51);
+ }
+ or plan skip_all =>
+ 'Test::WWW::Mechanize::Catalyst >= 0.51 is required for this test';
plan tests => 36;
}
or plan skip_all =>
"Catalyst::Plugin::Session::State::Cookie 0.03 or higher is required for this test";
- eval { require Test::WWW::Mechanize::Catalyst }
- or plan skip_all =>
- "Test::WWW::Mechanize::Catalyst is required for this test";
+ eval {
+ require Test::WWW::Mechanize::Catalyst;
+ Test::WWW::Mechanize::Catalyst->VERSION(0.51);
+ }
+ or plan skip_all =>
+ 'Test::WWW::Mechanize::Catalyst >= 0.51 is required for this test';
plan tests => 2;
}
or plan skip_all =>
"Catalyst::Plugin::Session::State::Cookie 0.03 or higher is required for this test";
- eval { require Test::WWW::Mechanize::Catalyst }
- or plan skip_all =>
- "Test::WWW::Mechanize::Catalyst is required for this test";
+ eval {
+ require Test::WWW::Mechanize::Catalyst;
+ Test::WWW::Mechanize::Catalyst->VERSION(0.51);
+ }
+ or plan skip_all =>
+ 'Test::WWW::Mechanize::Catalyst >= 0.51 is required for this test';
plan tests => 12;
}