[Catalyst-commits] r10132 - in
trunk/Catalyst-Plugin-Session-Store-FastMmap: .
lib/Catalyst/Plugin/Session/Store t t/lib
t0m at dev.catalyst.perl.org
t0m at dev.catalyst.perl.org
Wed May 13 21:12:40 GMT 2009
Author: t0m
Date: 2009-05-13 21:12:40 +0000 (Wed, 13 May 2009)
New Revision: 10132
Added:
trunk/Catalyst-Plugin-Session-Store-FastMmap/t/lib/
trunk/Catalyst-Plugin-Session-Store-FastMmap/t/lib/SessionStoreTest.pm
Modified:
trunk/Catalyst-Plugin-Session-Store-FastMmap/Changes
trunk/Catalyst-Plugin-Session-Store-FastMmap/Makefile.PL
trunk/Catalyst-Plugin-Session-Store-FastMmap/lib/Catalyst/Plugin/Session/Store/FastMmap.pm
trunk/Catalyst-Plugin-Session-Store-FastMmap/t/basic.t
Log:
Checking in changes prior to tagging of version 0.10. Changelog diff is:
Index: Changes
===================================================================
--- Changes (revision 10057)
+++ Changes (working copy)
@@ -1,4 +1,5 @@
-
+0.10 13 May 2009
+ - Change tests to be compatible with Catalyst 5.80004
- Re-add /session-file prefix to the test session directory which was
present in 0.07. I can't see where this was removed, but the test
looks more correct with it. RT#45724
Modified: trunk/Catalyst-Plugin-Session-Store-FastMmap/Changes
===================================================================
--- trunk/Catalyst-Plugin-Session-Store-FastMmap/Changes 2009-05-13 21:03:37 UTC (rev 10131)
+++ trunk/Catalyst-Plugin-Session-Store-FastMmap/Changes 2009-05-13 21:12:40 UTC (rev 10132)
@@ -1,4 +1,5 @@
-
+0.10 13 May 2009
+ - Change tests to be compatible with Catalyst 5.80004
- Re-add /session-file prefix to the test session directory which was
present in 0.07. I can't see where this was removed, but the test
looks more correct with it. RT#45724
Modified: trunk/Catalyst-Plugin-Session-Store-FastMmap/Makefile.PL
===================================================================
--- trunk/Catalyst-Plugin-Session-Store-FastMmap/Makefile.PL 2009-05-13 21:03:37 UTC (rev 10131)
+++ trunk/Catalyst-Plugin-Session-Store-FastMmap/Makefile.PL 2009-05-13 21:12:40 UTC (rev 10132)
@@ -5,7 +5,7 @@
'VERSION_FROM' => 'lib/Catalyst/Plugin/Session/Store/FastMmap.pm',
'PREREQ_PM' => {
'Cache::FastMmap' => '1.29',
- 'Catalyst::Plugin::Session' => '0.09',
+ 'Catalyst::Plugin::Session' => '0.22',
'File::Spec' => '0',
'File::Temp' => '0',
'Path::Class' => '0',
Modified: trunk/Catalyst-Plugin-Session-Store-FastMmap/lib/Catalyst/Plugin/Session/Store/FastMmap.pm
===================================================================
--- trunk/Catalyst-Plugin-Session-Store-FastMmap/lib/Catalyst/Plugin/Session/Store/FastMmap.pm 2009-05-13 21:03:37 UTC (rev 10131)
+++ trunk/Catalyst-Plugin-Session-Store-FastMmap/lib/Catalyst/Plugin/Session/Store/FastMmap.pm 2009-05-13 21:12:40 UTC (rev 10132)
@@ -13,7 +13,7 @@
use File::Spec ();
use Catalyst::Utils ();
-our $VERSION = '0.09';
+our $VERSION = '0.10';
__PACKAGE__->mk_classdata(qw/_session_fastmmap_storage/);
Modified: trunk/Catalyst-Plugin-Session-Store-FastMmap/t/basic.t
===================================================================
--- trunk/Catalyst-Plugin-Session-Store-FastMmap/t/basic.t 2009-05-13 21:03:37 UTC (rev 10131)
+++ trunk/Catalyst-Plugin-Session-Store-FastMmap/t/basic.t 2009-05-13 21:12:40 UTC (rev 10132)
@@ -1,40 +1,11 @@
-#!/usr/bin/perl
-
use strict;
use warnings;
-use File::Temp;
-use File::Spec;
+use FindBin qw/$Bin/;
+use lib "$Bin/lib";
-use Catalyst::Plugin::Session::Test::Store (
- backend => "FastMmap",
- config => { storage => File::Temp::tempdir( 'sessionstoretestXXXX', CLEANUP => 1 ) . '/storage_file' },
- extra_tests => 1
-);
+use Catalyst::Test "SessionStoreTest";
+use Test::More;
-{
- package SessionStoreTest;
-
- sub store_scalar : Global {
- my ($self, $c) = @_;
-
- $c->res->body($c->session->{'scalar'} = 456);
- }
-
- sub get_scalar : Global {
- my ($self, $c) = @_;
-
- $c->res->body($c->session->{'scalar'});
- }
-
- __PACKAGE__->setup_actions;
-
-}
-
-{
- use Catalyst::Test "SessionStoreTest";
- use Test::More;
-
- my $x = get("/store_scalar");
- is(get('/get_scalar'), 456, 'Can store scalar value okay');
-}
+my $x = get("/store_scalar");
+is(get('/get_scalar'), 456, 'Can store scalar value okay');
Added: trunk/Catalyst-Plugin-Session-Store-FastMmap/t/lib/SessionStoreTest.pm
===================================================================
--- trunk/Catalyst-Plugin-Session-Store-FastMmap/t/lib/SessionStoreTest.pm (rev 0)
+++ trunk/Catalyst-Plugin-Session-Store-FastMmap/t/lib/SessionStoreTest.pm 2009-05-13 21:12:40 UTC (rev 10132)
@@ -0,0 +1,36 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+use File::Temp;
+use File::Spec;
+
+use Catalyst::Plugin::Session::Test::Store (
+ backend => "FastMmap",
+ config => { storage => File::Temp::tempdir( 'sessionstoretestXXXX', CLEANUP => 1 ) . '/storage_file' },
+ extra_tests => 1
+);
+
+{
+ package SessionStoreTest;
+ use Catalyst;
+
+ sub store_scalar : Global {
+ my ($self, $c) = @_;
+
+ $c->res->body($c->session->{'scalar'} = 456);
+ }
+
+ sub get_scalar : Global {
+ my ($self, $c) = @_;
+
+ $c->res->body($c->session->{'scalar'});
+ }
+
+ __PACKAGE__->setup_actions;
+
+}
+
+1;
+
More information about the Catalyst-commits
mailing list