[Catalyst-commits] r14058 - in Catalyst-Plugin-Session-Store-DBIC/trunk: . lib/Catalyst/Plugin/Session/Store t

jnapiorkowski at dev.catalyst.perl.org jnapiorkowski at dev.catalyst.perl.org
Mon Aug 1 14:18:40 GMT 2011


Author: jnapiorkowski
Date: 2011-08-01 14:18:40 +0000 (Mon, 01 Aug 2011)
New Revision: 14058

Modified:
   Catalyst-Plugin-Session-Store-DBIC/trunk/Changes
   Catalyst-Plugin-Session-Store-DBIC/trunk/Makefile.PL
   Catalyst-Plugin-Session-Store-DBIC/trunk/lib/Catalyst/Plugin/Session/Store/DBIC.pm
   Catalyst-Plugin-Session-Store-DBIC/trunk/t/05dbic-schema.t
Log:
changes to support cataplack

Modified: Catalyst-Plugin-Session-Store-DBIC/trunk/Changes
===================================================================
--- Catalyst-Plugin-Session-Store-DBIC/trunk/Changes	2011-07-31 17:58:52 UTC (rev 14057)
+++ Catalyst-Plugin-Session-Store-DBIC/trunk/Changes	2011-08-01 14:18:40 UTC (rev 14058)
@@ -1,5 +1,10 @@
 Revision history for Catalyst-Plugin-Session-Store-DBIC
 
+0.12  Mon Aug  1 10:15:00 EDT 2011
+        - Changed a test case to be less picky about the actual text captured
+          from warnings.  This was done to support some changes introduced by
+          the Catalyst -> PSGI port.
+
 0.11  Fri Oct 16 15:04:07 CEST 2009
         - Convert to new session config key.
 

Modified: Catalyst-Plugin-Session-Store-DBIC/trunk/Makefile.PL
===================================================================
--- Catalyst-Plugin-Session-Store-DBIC/trunk/Makefile.PL	2011-07-31 17:58:52 UTC (rev 14057)
+++ Catalyst-Plugin-Session-Store-DBIC/trunk/Makefile.PL	2011-08-01 14:18:40 UTC (rev 14058)
@@ -20,7 +20,7 @@
         'Storable'                                   => 0,
         'FindBin'                                    => 0,
         'Test::More'                                 => 0,
-        'Test::Warn'                                 => 0,
+        'Test::Warn'                                 => '0.20', # so we get warnings_exist
     },
     META_MERGE              => {
         repository  =>      'http://dev.catalyst.perl.org/repos/Catalyst/Catalyst-Plugin-Session-Store-DBIC/',

Modified: Catalyst-Plugin-Session-Store-DBIC/trunk/lib/Catalyst/Plugin/Session/Store/DBIC.pm
===================================================================
--- Catalyst-Plugin-Session-Store-DBIC/trunk/lib/Catalyst/Plugin/Session/Store/DBIC.pm	2011-07-31 17:58:52 UTC (rev 14057)
+++ Catalyst-Plugin-Session-Store-DBIC/trunk/lib/Catalyst/Plugin/Session/Store/DBIC.pm	2011-08-01 14:18:40 UTC (rev 14058)
@@ -9,7 +9,7 @@
 use MRO::Compat;
 use Storable ();
 
-our $VERSION = '0.11';
+our $VERSION = '0.12';
 
 =head1 NAME
 

Modified: Catalyst-Plugin-Session-Store-DBIC/trunk/t/05dbic-schema.t
===================================================================
--- Catalyst-Plugin-Session-Store-DBIC/trunk/t/05dbic-schema.t	2011-07-31 17:58:52 UTC (rev 14057)
+++ Catalyst-Plugin-Session-Store-DBIC/trunk/t/05dbic-schema.t	2011-08-01 14:18:40 UTC (rev 14058)
@@ -66,7 +66,7 @@
 
 # Exceed our session storage capactity
 $value = "blah" x 200;
-warning_like {
+warnings_exist {
     $mech->get_ok("http://localhost/session/setup?key=$key&value=$value", 'exceeding storage capacity');
 } qr/This session requires \d+ bytes of storage, but your database column 'data' can only store 200 bytes. Storing this session may not be reliable; increase the size of your data field/, 'warning thrown as expected';
 




More information about the Catalyst-commits mailing list