[Catalyst-commits] r11601 - Catalyst-Plugin-Session-Store-DBI/trunk/lib/Catalyst/Plugin/Session/Store

t0m at dev.catalyst.perl.org t0m at dev.catalyst.perl.org
Sat Oct 17 17:15:18 GMT 2009


Author: t0m
Date: 2009-10-17 17:15:18 +0000 (Sat, 17 Oct 2009)
New Revision: 11601

Modified:
   Catalyst-Plugin-Session-Store-DBI/trunk/lib/Catalyst/Plugin/Session/Store/DBI.pm
Log:
Call the bleeding config method, rather than poking round inside the hash ourselves.

Modified: Catalyst-Plugin-Session-Store-DBI/trunk/lib/Catalyst/Plugin/Session/Store/DBI.pm
===================================================================
--- Catalyst-Plugin-Session-Store-DBI/trunk/lib/Catalyst/Plugin/Session/Store/DBI.pm	2009-10-17 17:13:31 UTC (rev 11600)
+++ Catalyst-Plugin-Session-Store-DBI/trunk/lib/Catalyst/Plugin/Session/Store/DBI.pm	2009-10-17 17:15:18 UTC (rev 11601)
@@ -332,20 +332,20 @@
     use Catalyst qw/Session Session::Store::DBI Session::State::Cookie/;
     
     # Connect directly to the database
-    MyApp->config->{'Plugin::Session'} = {
+    MyApp->config('Plugin::Session' => {
         expires   => 3600,
         dbi_dsn   => 'dbi:mysql:database',
         dbi_user  => 'foo',
         dbi_pass  => 'bar',
         dbi_table => 'sessions',
-    };
+    });
     
     # Or use an existing database handle from a DBIC/CDBI class
-    MyApp->config->{'Plugin::Session'} = {
+    MyApp->config('Plugin::Session' => {
         expires   => 3600,
         dbi_dbh   => 'DBIC', # which means MyApp::Model::DBIC
         dbi_table => 'sessions',
-    };
+    });
 
     # ... in an action:
     $c->session->{foo} = 'bar'; # will be saved




More information about the Catalyst-commits mailing list