[Catalyst-commits] r11744 - Catalyst-Plugin-Session/0.00/branches/session_deleted_bug/lib/Catalyst/Plugin

[jsut at dev.catalyst.perl.org]

Author: jsut
Date: 2009-11-04 21:38:49 +0000 (Wed, 04 Nov 2009)
New Revision: 11744

Modified:
   Catalyst-Plugin-Session/0.00/branches/session_deleted_bug/lib/Catalyst/Plugin/Session.pm
Log:
This patch makes it so that the expiry is not looked up in the underlying store when a session has not yet committed to the store.
Probably not the most graceful way to do it, but it works.



Modified: Catalyst-Plugin-Session/0.00/branches/session_deleted_bug/lib/Catalyst/Plugin/Session.pm
===================================================================
--- Catalyst-Plugin-Session/0.00/branches/session_deleted_bug/lib/Catalyst/Plugin/Session.pm	2009-11-04 20:28:46 UTC (rev 11743)
+++ Catalyst-Plugin-Session/0.00/branches/session_deleted_bug/lib/Catalyst/Plugin/Session.pm	2009-11-04 21:38:49 UTC (rev 11744)
@@ -375,6 +375,11 @@
 
     my $exp = $c->calculate_initial_session_expires;
     $c->_session_expires( $exp );
+    #
+    # since we're setting _session_expires directly, make load_session_expires
+    # actually use that value.
+    #
+    $c->_tried_loading_session_expires(1);
     $c->_extended_session_expires( $exp );
     $exp;
 }